summaryrefslogtreecommitdiff
path: root/uupacktool.pl
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>2007-11-06 07:58:05 -0800
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-11-07 10:45:18 +0000
commitaffddad4a362e52a59118d6b0e80c83e34b95a13 (patch)
tree311012aa16f43ef9d31ccfcd4be19ec91725fb33 /uupacktool.pl
parent6c7ff7263d043874d08f20e35bb78bd38b5e037b (diff)
downloadperl-affddad4a362e52a59118d6b0e80c83e34b95a13.tar.gz
Erroneous binmode() call in uupacktool.pl
From: "Jan Dubois" <jand@activestate.com> Message-ID: <01f101c820d0$df6c9220$9e45b660$@com> p4raw-id: //depot/perl@32234
Diffstat (limited to 'uupacktool.pl')
-rw-r--r--uupacktool.pl1
1 files changed, 0 insertions, 1 deletions
diff --git a/uupacktool.pl b/uupacktool.pl
index bf947bb259..bb4dc0092f 100644
--- a/uupacktool.pl
+++ b/uupacktool.pl
@@ -26,7 +26,6 @@ sub handle_file {
open my $fh, "<", $file
or do { warn "Could not open input file $file: $!"; exit 0 };
- binmode $fh;
my $str = do { local $/; <$fh> };
### unpack?