diff options
author | mat <mat@FreeBSD.org> | 2007-02-10 00:02:06 +0800 |
---|---|---|
committer | mat <mat@FreeBSD.org> | 2007-02-10 00:02:06 +0800 |
commit | 0c7b5d54f150a16bf386ccababe5c716440640e4 (patch) | |
tree | 0b7bb2b344fd182eb5f8e5593f1ad63eac7662f6 /net/p5-Net/files | |
parent | 0e63c0d9f44532e9ab86362f363df5700f181a03 (diff) | |
download | freebsd-ports-gnome-0c7b5d54f150a16bf386ccababe5c716440640e4.tar.gz freebsd-ports-gnome-0c7b5d54f150a16bf386ccababe5c716440640e4.tar.zst freebsd-ports-gnome-0c7b5d54f150a16bf386ccababe5c716440640e4.zip |
Fixup an utf-8 problem
Submitted by: too many
Obtained from: http://rt.cpan.org/Public/Bug/Display.html?id=24835
Diffstat (limited to 'net/p5-Net/files')
-rw-r--r-- | net/p5-Net/files/patch-Net_Cmd.pm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/net/p5-Net/files/patch-Net_Cmd.pm b/net/p5-Net/files/patch-Net_Cmd.pm new file mode 100644 index 000000000000..d81d9bb18f3b --- /dev/null +++ b/net/p5-Net/files/patch-Net_Cmd.pm @@ -0,0 +1,20 @@ +--- Net/Cmd.pm~ Fri Oct 27 13:08:07 2006 ++++ Net/Cmd.pm Fri Feb 9 16:02:10 2007 +@@ -21,8 +21,6 @@ + } + } + +-my $doUTF8 = eval { require utf8 }; +- + $VERSION = "2.27"; + @ISA = qw(Exporter); + @EXPORT = qw(CMD_INFO CMD_OK CMD_MORE CMD_REJECT CMD_ERROR CMD_PENDING); +@@ -394,8 +392,6 @@ + my $cmd = shift; + my $arr = @_ == 1 && ref($_[0]) ? $_[0] : \@_; + my $line = join("" ,@$arr); +- +- utf8::encode($line) if $doUTF8; + + return 0 unless defined(fileno($cmd)); + |