summaryrefslogtreecommitdiff
path: root/dev-perl/Net-Telnet-Cisco/files/1.10-warning.patch
blob: 1ec11726ce1c7caceda1dbce6a7f2f4d9adda4ed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
https://bugs.gentoo.org/show_bug.cgi?id=192808
http://rt.cpan.org/Public/Bug/Display.html?id=7796

diff -ru Net-Telnet-Cisco-1.10/Cisco.pm Net-Telnet-Cisco-1.10/Cisco.pm
--- Net-Telnet-Cisco-1.10/Cisco.pm	2002-06-18 19:17:03.000000000 +0200
+++ Net-Telnet-Cisco-1.10/Cisco.pm	2008-05-08 20:59:09.000000000 +0200
@@ -753,7 +753,7 @@
     1 while s/[^\cH\c?][\cH\c?]//mg; # ^H ^?
     s/^.*\cU//mg;		     # ^U
 
-    return wantarray ? split /$/mg, $_ : $_; # ORS instead?
+    return wantarray ? split /$/m, $_ : $_; # ORS instead?
 }
 
 # Lifted from Net::Telnet en toto