[SCM] Debian packaging of libmojolicious-perl branch, master, updated. debian/2.98+dfsg-1-5-gdc7ed70

[Dominique Dumont]

The following commit has been merged in the master branch:
commit 4ed112a633ade0e14978508a77259ab24b32f0cb
Author: Dominique Dumont <dod at debian.org>
Date:   Wed Sep 5 17:33:29 2012 +0200

    patch to avoid clobbering $_ (Closes: #686750)

diff --git a/debian/patches/dont-clobber-dollar-_ b/debian/patches/dont-clobber-dollar-_
new file mode 100644
index 0000000..d2490aa
--- /dev/null
+++ b/debian/patches/dont-clobber-dollar-_
@@ -0,0 +1,16 @@
+--- a/lib/Mojo/Transaction/WebSocket.pm
++++ b/lib/Mojo/Transaction/WebSocket.pm
+@@ -297,9 +297,10 @@
+ 
+   # 512 byte mask
+   $mask = $mask x 128;
+-  my $output = '';
+-  $output .= $_ ^ $mask while length($_ = substr($input, 0, 512, '')) == 512;
+-  return $output .= $_ ^ substr($mask, 0, length, '');
++  my $buffer = my $output = '';
++  $output .= $buffer ^ $mask 
++	while length($buffer = substr($input, 0, 512, '')) == 512;
++  return $output .= $buffer ^ substr($mask, 0, length $buffer, '');
+ }
+ 
+ 1;
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..95da166
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+dont-clobber-dollar-_

-- 
Debian packaging of libmojolicious-perl