summaryrefslogtreecommitdiff
path: root/scripts/Dpkg
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/Dpkg')
-rw-r--r--scripts/Dpkg/Compression/CompressedFile.pm (renamed from scripts/Dpkg/Source/CompressedFile.pm)2
-rw-r--r--scripts/Dpkg/Index.pm6
-rw-r--r--scripts/Dpkg/Source/Archive.pm2
-rw-r--r--scripts/Dpkg/Source/Patch.pm4
4 files changed, 7 insertions, 7 deletions
diff --git a/scripts/Dpkg/Source/CompressedFile.pm b/scripts/Dpkg/Compression/CompressedFile.pm
index 52fd8ee87..c7eae1352 100644
--- a/scripts/Dpkg/Source/CompressedFile.pm
+++ b/scripts/Dpkg/Compression/CompressedFile.pm
@@ -13,7 +13,7 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-package Dpkg::Source::CompressedFile;
+package Dpkg::Compression::CompressedFile;
use strict;
use warnings;
diff --git a/scripts/Dpkg/Index.pm b/scripts/Dpkg/Index.pm
index a3dd69a23..d2e86dc99 100644
--- a/scripts/Dpkg/Index.pm
+++ b/scripts/Dpkg/Index.pm
@@ -21,7 +21,7 @@ use warnings;
use Dpkg::Gettext;
use Dpkg::ErrorHandling;
use Dpkg::Control;
-use Dpkg::Source::CompressedFile;
+use Dpkg::Compression::CompressedFile;
use overload
'@{}' => sub { return $_[0]->{'order'} },
@@ -155,7 +155,7 @@ parsed. Handles compressed files transparently based on their extensions.
sub load {
my ($self, $file) = @_;
- my $cf = Dpkg::Source::CompressedFile->new(filename => $file);
+ my $cf = Dpkg::Compression::CompressedFile->new(filename => $file);
my $fh = $cf->open_for_read();
my $res = $self->parse($fh, $file);
$cf->cleanup_after_open();
@@ -191,7 +191,7 @@ based on their extensions.
sub save {
my ($self, $file) = @_;
- my $cf = Dpkg::Source::CompressedFile->new(filename => $file);
+ my $cf = Dpkg::Compression::CompressedFile->new(filename => $file);
my $fh = $cf->open_for_write();
$self->output($fh);
$cf->cleanup_after_open();
diff --git a/scripts/Dpkg/Source/Archive.pm b/scripts/Dpkg/Source/Archive.pm
index be1c1bd56..3d0dcce96 100644
--- a/scripts/Dpkg/Source/Archive.pm
+++ b/scripts/Dpkg/Source/Archive.pm
@@ -29,7 +29,7 @@ use File::Basename qw(basename);
use File::Spec;
use Cwd;
-use base 'Dpkg::Source::CompressedFile';
+use base 'Dpkg::Compression::CompressedFile';
sub create {
my ($self, %opts) = @_;
diff --git a/scripts/Dpkg/Source/Patch.pm b/scripts/Dpkg/Source/Patch.pm
index 68e6f507d..e1b3dc24f 100644
--- a/scripts/Dpkg/Source/Patch.pm
+++ b/scripts/Dpkg/Source/Patch.pm
@@ -19,7 +19,7 @@ use strict;
use warnings;
use Dpkg;
-use Dpkg::Source::CompressedFile;
+use Dpkg::Compression::CompressedFile;
use Dpkg::Compression::Compressor;
use Dpkg::Compression;
use Dpkg::Gettext;
@@ -36,7 +36,7 @@ use Fcntl ':mode';
#XXX: Needed for sub-second timestamps, require recent perl
#use Time::HiRes qw(stat);
-use base 'Dpkg::Source::CompressedFile';
+use base 'Dpkg::Compression::CompressedFile';
sub create {
my ($self, %opts) = @_;