From: Raphael Hertzog Date: Fri, 22 Feb 2008 18:16:26 +0000 (+0100) Subject: Rename Dpkg::Source::Archiver to Dpkg::Source::Archive X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=17cfcad6461e118cef9b07aae02e9b26db68f530;p=dpkg Rename Dpkg::Source::Archiver to Dpkg::Source::Archive --- diff --git a/scripts/Dpkg/Source/Archiver.pm b/scripts/Dpkg/Source/Archive.pm similarity index 99% rename from scripts/Dpkg/Source/Archiver.pm rename to scripts/Dpkg/Source/Archive.pm index 69fd1045..b378a963 100644 --- a/scripts/Dpkg/Source/Archiver.pm +++ b/scripts/Dpkg/Source/Archive.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; diff --git a/scripts/Makefile.am b/scripts/Makefile.am index 4d8c97d1..0221ca6d 100644 --- a/scripts/Makefile.am +++ b/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 \ diff --git a/scripts/dpkg-source.pl b/scripts/dpkg-source.pl index 22584dab..593370c5 100755 --- a/scripts/dpkg-source.pl +++ b/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: diff --git a/scripts/po/POTFILES.in b/scripts/po/POTFILES.in index f8bdfa29..20397e69 100644 --- a/scripts/po/POTFILES.in +++ b/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