[SCM] Debian packaging of libhtml-copy-perl branch, master, updated. c6cbaa161d18a500e9dce7c226edee6d1b2ae8fc

Mon Jun 17 18:54:02 UTC 2013

The following commit has been merged in the master branch:
commit 04337b169932c49051639f8d483ede254a27b1eb
Author: gregor herrmann <gregoa at debian.org>
Date:   Mon Jun 17 20:37:30 2013 +0200

    Add patch to fix "Strings with code points over 0xFF may not be mapped into in-memory file handles" error.
    
    Closes: #711448

diff --git a/debian/patches/Strings_with_code_points_over_0xFF.patch b/debian/patches/Strings_with_code_points_over_0xFF.patch
new file mode 100644
index 0000000..45bd819
--- /dev/null
+++ b/debian/patches/Strings_with_code_points_over_0xFF.patch
@@ -0,0 +1,70 @@
+Description: Fix test failure.
+ From perldiag in 5.18:
+ .
+ Strings with code points over 0xFF may not be mapped into in-memory file handles
+ .
+  (W utf8) You tried to open a reference to a scalar for read or append
+  where the scalar contained code points over 0xFF. In-memory files model
+  on-disk files and can only contain bytes.
+Origin: vendor
+Bug: http://rt.cpan.org/Public/Bug/Display.html?id=85949
+Forwarded: not-yet
+Bug-Debian: http://bugs.debian.org/711448
+Author: gregor herrmann <gregoa at debian.org>
+Last-Update: 2013-06-17
+
+--- a/t/parse.t
++++ b/t/parse.t
+@@ -6,6 +6,7 @@
+ use utf8;
+ use File::Spec::Functions;
+ #use Data::Dumper;
++use Encode qw(encode_utf8 decode_utf8);
+ 
+ use Test::More tests => 16;
+ 
+@@ -109,7 +110,7 @@
+ ok($copy_html eq $result_html_nocharset, "copy_to no charset shift_jis");
+ 
+ ##== HTML with charset uft-8
+-my $src_html_utf8 = <<EOT;
++my $src_html_utf8 = encode_utf8(<<EOT);
+ <!DOCTYPE html>
+ <html>
+ <head>
+@@ -126,7 +127,7 @@
+ </html>
+ EOT
+ 
+-my $result_html_utf8 = <<EOT;
++my $result_html_utf8 = encode_utf8(<<EOT);
+ <!DOCTYPE html>
+ <html>
+ <head>
+@@ -174,7 +175,7 @@
+     read_and_unlink($destination, $p);
+ };
+ 
+-ok($copy_html eq $result_html_utf8, "copy_to giviing a file handle");
++ok($copy_html eq decode_utf8($result_html_utf8), "copy_to giving a file handle");
+ 
+ ##=== copy_to gving file handles for input and output
+ $copy_html = do {
+@@ -187,7 +188,7 @@
+     Encode::decode($p->encoding, $outdata);
+ };
+ 
+-ok($copy_html eq $result_html_utf8, "copy_to giviing file handles for input and output");
++ok($copy_html eq decode_utf8($result_html_utf8), "copy_to giving file handles for input and output");
+ 
+ ##=== parse_to giving a file handle
+ $copy_html = do {
+@@ -196,7 +197,7 @@
+     $p->parse_to($destination);
+ };
+ 
+-ok($copy_html eq $result_html_utf8, "copy_to giviing file handles for input and output");
++ok($copy_html eq decode_utf8($result_html_utf8), "copy_to giving file handles for input and output");
+ 
+ ##=== copy_to with directory destination
+ $copy_html = do {
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..9569d72
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+Strings_with_code_points_over_0xFF.patch

-- 
Debian packaging of libhtml-copy-perl

