# 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;
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;
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);
}
$expectprefix= $origdir; $expectprefix =~ s,^\./,,;
- my $tar = Dpkg::Source::Archiver->new(filename => $origtargz);
+ my $tar = Dpkg::Source::Archive->new(filename => $origtargz);
$tar->extract($expectprefix);
}
}
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:
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