aboutsummaryrefslogtreecommitdiffstats
path: root/net/p5-Net/files
diff options
context:
space:
mode:
authormat <mat@FreeBSD.org>2007-02-10 00:02:06 +0800
committermat <mat@FreeBSD.org>2007-02-10 00:02:06 +0800
commit0c7b5d54f150a16bf386ccababe5c716440640e4 (patch)
tree0b7bb2b344fd182eb5f8e5593f1ad63eac7662f6 /net/p5-Net/files
parent0e63c0d9f44532e9ab86362f363df5700f181a03 (diff)
downloadfreebsd-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.pm20
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));
+