Просмотр исходного кода

Rename Dpkg::Source::Archiver to Dpkg::Source::Archive

Raphael Hertzog лет назад: 18
Родитель
Сommit
17cfcad646
4 измененных файлов с 7 добавлено и 7 удалено
  1. 1 1
      scripts/Dpkg/Source/Archiver.pm
  2. 1 1
      scripts/Makefile.am
  3. 4 4
      scripts/dpkg-source.pl
  4. 1 1
      scripts/po/POTFILES.in

+ 1 - 1
scripts/Dpkg/Source/Archiver.pm

@@ -14,7 +14,7 @@
 # with this program; if not, write to the Free Software Foundation, Inc.,
 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
-package Dpkg::Source::Archiver;
+package Dpkg::Source::Archive;
 
 use strict;
 use warnings;

+ 1 - 1
scripts/Makefile.am

@@ -105,7 +105,7 @@ nobase_dist_perllib_DATA = \
 	Dpkg/Substvars.pm \
 	Dpkg/Vars.pm \
 	Dpkg/Version.pm \
-	Dpkg/Source/Archiver.pm \
+	Dpkg/Source/Archive.pm \
 	Dpkg/Source/CompressedFile.pm \
 	Dpkg/Source/Compressor.pm \
 	Dpkg/Source/Patch.pm \

+ 4 - 4
scripts/dpkg-source.pl

@@ -21,7 +21,7 @@ use Dpkg::Version qw(check_version);
 use Dpkg::Vars;
 use Dpkg::Changelog qw(parse_changelog);
 use Dpkg::Source::Compressor;
-use Dpkg::Source::Archiver;
+use Dpkg::Source::Archive;
 use Dpkg::Source::Patch;
 use Dpkg::IPC;
 
@@ -595,7 +595,7 @@ if ($opmode eq 'build') {
 
 	my ($ntfh, $newtar) = tempfile("$tarname.new.XXXXXX",
 				       DIR => getcwd(), UNLINK => 0);
-	my $tar = Dpkg::Source::Archiver->new(filename => $newtar,
+	my $tar = Dpkg::Source::Archive->new(filename => $newtar,
 		    compression => get_compression_from_filename($tarname),
 		    compression_level => $comp_level);
 	$tar->create(options => \@tar_ignore);
@@ -632,7 +632,7 @@ if ($opmode eq 'build') {
         }
 
         $expectprefix= $origdir; $expectprefix =~ s,^\./,,;
-	my $tar = Dpkg::Source::Archiver->new(filename => $origtargz);
+	my $tar = Dpkg::Source::Archive->new(filename => $origtargz);
 	$tar->extract($expectprefix);
     }
 
@@ -878,7 +878,7 @@ if ($opmode eq 'build') {
 	}
 
 	printf(_g("%s: unpacking %s")."\n", $progname, $tarfile);
-	my $tar = Dpkg::Source::Archiver->new(filename => "$dscdir/$tarfile");
+	my $tar = Dpkg::Source::Archive->new(filename => "$dscdir/$tarfile");
 	$tar->extract($target);
 
 	# for the first tar file:

+ 1 - 1
scripts/po/POTFILES.in

@@ -27,7 +27,7 @@ scripts/Dpkg/IPC.pm
 scripts/Dpkg/Shlibs.pm
 scripts/Dpkg/Shlibs/Objdump.pm
 scripts/Dpkg/Shlibs/SymbolFile.pm
-scripts/Dpkg/Source/Archiver.pm
+scripts/Dpkg/Source/Archive.pm
 scripts/Dpkg/Source/CompressedFile.pm
 scripts/Dpkg/Source/Compressor.pm
 scripts/Dpkg/Source/Patch.pm