This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository carton.

commit 96f48370508e2c590b297f707e087d8204011fd4
Author: Tatsuhiko Miyagawa <miyag...@bulknews.net>
Date:   Thu May 30 16:42:26 2013 +0900

    remove unused gz generation code
---
 lib/Carton.pm | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/lib/Carton.pm b/lib/Carton.pm
index ecae3cb..72e0ee2 100644
--- a/lib/Carton.pm
+++ b/lib/Carton.pm
@@ -111,14 +111,7 @@ sub build_mirror_file {
 
     my @packages = $self->build_packages($index);
 
-    my $fh;
-    if ($file =~ /\.gz$/i) {
-        require IO::Compress::Gzip;
-        $fh = IO::Compress::Gzip->new($file) or die 
$IO::Compress::Gzip::GzipError;
-    } else {
-        open $fh, ">", $file or die $!;
-    }
-
+    open my $fh, ">", $file or die $!;
     print $fh <<EOF;
 File:         02packages.details.txt
 URL:          http://www.perl.com/CPAN/modules/02packages.details.txt

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/carton.git

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to