[libcurses-perl] 04/07: add a patch fixing encoding issues in Curses.pm POD
Damyan Ivanov
dmn at moszumanska.debian.org
Wed May 21 09:03:34 UTC 2014
This is an automated email from the git hooks/post-receive script.
dmn pushed a commit to branch master
in repository libcurses-perl.
commit c7d0297bd9468e5b99428eed422b0fd0d0ffe3dc
Author: Damyan Ivanov <dmn at debian.org>
Date: Wed May 21 08:50:08 2014 +0000
add a patch fixing encoding issues in Curses.pm POD
---
debian/patches/pod-encoding.patch | 43 +++++++++++++++++++++++++++++++++++++++
debian/patches/series | 1 +
2 files changed, 44 insertions(+)
diff --git a/debian/patches/pod-encoding.patch b/debian/patches/pod-encoding.patch
new file mode 100644
index 0000000..3ab9173
--- /dev/null
+++ b/debian/patches/pod-encoding.patch
@@ -0,0 +1,43 @@
+Description: fix Latin1 characters in POD, declare encding
+ =encoding is needed or pod2man --errors=man complains otherwise
+ .
+ Also fix the special characters to be valid Latin1
+Forwarded: https://rt.cpan.org/Ticket/Display?id=95825
+--- a/Curses.pm
++++ b/Curses.pm
+@@ -247,6 +247,8 @@ EOS
+
+ __END__
+
++=encoding Latin1
++
+ =head1 NAME
+
+ Curses - terminal screen handling and optimization
+@@ -400,7 +402,7 @@ If C<wget_wch()> is not available (i.e.
+ wide characters), this calls C<wgetch()>, but returns the values described
+ above nonetheless. This can be a problem because with a multibyte character
+ encoding like UTF-8, you will receive two one-character strings for a
+-two-byte-character (e.g. "��" and "��" for "��"). If you append
++two-byte-character (e.g. "�" and "�" for "�"). If you append
+ these characters to a Perl string, that string may internally contain a valid
+ UTF-8 encoding of a character, but Perl will not interpret it that way. Perl
+ may even try to convert what it believes to be two characters to UTF-8, giving
+@@ -435,7 +437,7 @@ failure.
+
+ =over 4
+
+- addstring("H��ll��, W��rld") ||��die "addstring failed";
++ addstring("H�ll�, W�rld") ||�die "addstring failed";
+
+ =back
+
+@@ -461,7 +463,7 @@ library provides no way to push back fun
+
+ =over 4
+
+- ungetchar("X") ||��die "ungetchar failed";
++ ungetchar("X") ||�die "ungetchar failed";
+
+ =back
+
diff --git a/debian/patches/series b/debian/patches/series
index af6f97e..00b0a06 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1,3 @@
t_upstream_spelling.diff
libcurses-perl_hurd1.debdiff
+pod-encoding.patch
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcurses-perl.git
More information about the Pkg-perl-cvs-commits
mailing list