diff options
| author | Robin Barker <RMBarker@cpan.org> | 2001-02-08 14:38:07 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-02-08 19:38:48 +0000 |
| commit | e8427fc1f84a6c6e366343fd87a9a70fca81f022 (patch) | |
| tree | 391016d10fa0f96f1cf7ce4bb10ad044e497e4d7 /lib/CPAN.pm | |
| parent | 690cf326c97f734cee3f458d1ac6808f74528c17 (diff) | |
| download | perl-e8427fc1f84a6c6e366343fd87a9a70fca81f022.tar.gz | |
warning message (not!)
Message-Id: <200102081438.OAA20498@tempest.npl.co.uk>
p4raw-id: //depot/perl@8717
Diffstat (limited to 'lib/CPAN.pm')
| -rw-r--r-- | lib/CPAN.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/CPAN.pm b/lib/CPAN.pm index fce7dc455b..ed48d681f3 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; } |