r27326 - /trunk/dh-make-perl/dh-make-perl
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Thu Nov 27 08:33:59 UTC 2008
Author: dmn
Date: Thu Nov 27 08:33:57 2008
New Revision: 27326
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27326
Log:
AptContents: support uncompressed contents files
Modified:
trunk/dh-make-perl/dh-make-perl
Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=27326&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Thu Nov 27 08:33:57 2008
@@ -178,7 +178,9 @@
for ( @{ $self->contents_files } ) {
push @{ $cache->{contents_files} }, $_;
warn "Parsing $_ ...\n";
- my $f = IO::Uncompress::Gunzip->new($_);
+ my $f = /\.gz$/
+ ? IO::Uncompress::Gunzip->new($_)
+ : IO::File->new( $_, 'r' );
unless ($f) {
warn "Error reading '$_': $!\n";
More information about the Pkg-perl-cvs-commits
mailing list