Add unrecognized_character_x17.patch (closes: #841252)

5d92d5cb · Florian Schlichting · 88eb3da6 · 5d92d5cb · 5d92d5cb
Commit 5d92d5cb authored 8 years ago by Florian Schlichting
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -2,3 +2,4 @@ hashbang.patch
 fix-own-master-error
 fix-pod
 test.patch
+unrecognized_character_x17.patch
--- a/debian/patches/unrecognized_character_x17.patch
+++ b/debian/patches/unrecognized_character_x17.patch
+Description: fix "unrecognized character \x17" error
+ $^W using Control-W was deprecated in 5.20 and became a hard error in 5.24
+Author: Florian Schlichting <fsfs@debian.org>
+Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=841252
+Forwarded: https://rt.cpan.org/Ticket/Display.html?id=118463
+
+--- a/FileDialog.pm
+++ b/FileDialog.pm
+@@ -607,10 +607,10 @@
+ ####  PRIVATE METHODS AND SUBROUTINES ####
+ sub IsNum {
+     my($parm) = @_;
+-    my($warnSave) = $;
+-    $ = 0;
+    my($warnSave) = $^W;
+    $^W = 0;
+     my($res) = (($parm + 0) eq $parm);
+-    $ = $warnSave;
+    $^W = $warnSave;
+     return $res;
+ }
+