From: Robin Barker Date: Thu, 8 Feb 2001 14:38:07 +0000 (+0000) Subject: warning message (not!) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8427fc1f84a6c6e366343fd87a9a70fca81f022;p=p5sagit%2Fp5-mst-13.2.git warning message (not!) Message-Id: <200102081438.OAA20498@tempest.npl.co.uk> p4raw-id: //depot/perl@8717 --- diff --git a/lib/CPAN.pm b/lib/CPAN.pm index fce7dc4..ed48d68 100644 --- a/lib/CPAN.pm +++ b/lib/CPAN.pm @@ -5388,7 +5388,7 @@ sub TIEHANDLE { $ret = bless {GZ => $gz}, $class; } else { my $pipe = "$CPAN::Config->{gzip} --decompress --stdout $file |"; - my $fh = FileHandle->new($pipe) or die "Could pipe[$pipe]: $!"; + my $fh = FileHandle->new($pipe) or die "Could not pipe[$pipe]: $!"; binmode $fh; $ret = bless {FH => $fh}, $class; }