r15136 - in /trunk/libi18n-charset-perl: debian/changelog debian/patches/series debian/patches/t_utf8.patch t/utf8.t

gregoa-guest at users.alioth.debian.org gregoa-guest at users.alioth.debian.org
Mon Feb 18 21:56:30 UTC 2008


Author: gregoa-guest
Date: Mon Feb 18 21:56:28 2008
New Revision: 15136

URL: http://svn.debian.org/wsvn/?sc=1&rev=15136
Log:
  - t_utf8.patch: formerly directly applied; revert t/utf8.t to pristine
    version

Added:
    trunk/libi18n-charset-perl/debian/patches/t_utf8.patch
Modified:
    trunk/libi18n-charset-perl/debian/changelog
    trunk/libi18n-charset-perl/debian/patches/series
    trunk/libi18n-charset-perl/t/utf8.t

Modified: trunk/libi18n-charset-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libi18n-charset-perl/debian/changelog?rev=15136&op=diff
==============================================================================
--- trunk/libi18n-charset-perl/debian/changelog (original)
+++ trunk/libi18n-charset-perl/debian/changelog Mon Feb 18 21:56:28 2008
@@ -24,8 +24,10 @@
   * Patches:
     - add quilt framework
     - t_rt33087_number.patch: new, fixes number of tests
-
- -- gregor herrmann <gregor+debian at comodo.priv.at>  Mon, 18 Feb 2008 22:37:21 +0100
+    - t_utf8.patch: formerly directly applied; revert t/utf8.t to pristine
+      version
+
+ -- gregor herrmann <gregor+debian at comodo.priv.at>  Mon, 18 Feb 2008 22:42:54 +0100
 
 libi18n-charset-perl (1.385-1) unstable; urgency=low
 

Modified: trunk/libi18n-charset-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/trunk/libi18n-charset-perl/debian/patches/series?rev=15136&op=diff
==============================================================================
--- trunk/libi18n-charset-perl/debian/patches/series (original)
+++ trunk/libi18n-charset-perl/debian/patches/series Mon Feb 18 21:56:28 2008
@@ -1,1 +1,2 @@
 t_rt33087_number.patch
+t_utf8.patch

Added: trunk/libi18n-charset-perl/debian/patches/t_utf8.patch
URL: http://svn.debian.org/wsvn/trunk/libi18n-charset-perl/debian/patches/t_utf8.patch?rev=15136&op=file
==============================================================================
--- trunk/libi18n-charset-perl/debian/patches/t_utf8.patch (added)
+++ trunk/libi18n-charset-perl/debian/patches/t_utf8.patch Mon Feb 18 21:56:28 2008
@@ -1,0 +1,24 @@
+--- libi18n-charset-perl.orig/t/utf8.t
++++ libi18n-charset-perl/t/utf8.t
+@@ -39,14 +39,14 @@
+       {

+       skip 'Unicode::Map8 is not installed', 7 unless eval 'require Unicode::Map8';

+       # Unicode::Map8 aliases:

+-      ok(umu8_charset_name("Windows-1-2-5-1") eq "cp1251", 'windows-1-2-5-1');

+-      ok(umu8_charset_name("windows-1252") eq "cp1252", 'windows-1252 eq');

+-      ok(umu8_charset_name("win-latin-1") eq "cp1252", 'win-latin-1');

+-      ok(umu8_charset_name("windows-1252") ne "cp1253", 'windows-1252 ne');

+-      ok(umu8_charset_name("windows-1253") eq "cp1253", 'windows-1253');

++      ok(umu8_charset_name("Windows-1-2-5-1") eq "windows-1251", 'windows-1-2-5-1');

++      ok(umu8_charset_name("windows-1252") eq "windows-1252", 'windows-1252 eq');

++      ok(umu8_charset_name("win-latin-1") eq "windows-1252", 'win-latin-1');

++      ok(umu8_charset_name("windows-1252") ne "windows-1253", 'windows-1252 ne');

++      ok(umu8_charset_name("windows-1253") eq "windows-1253", 'windows-1253');

+       # Unicode::Map8 names with dummy mib:

+-      ok(umu8_charset_name("Adobe Zapf Ding Bats") eq "Adobe-Zapf-Dingbats", 'Adobe Zapf Ding Bats');

+-      ok(umu8_charset_name(" c p 1 0 0 7 9 ") eq "cp10079", ' c p 1 0 0 7 9 ');

++#      ok(umu8_charset_name("Adobe Zapf Ding Bats") eq "Adobe-Zapf-Dingbats", 'Adobe Zapf Ding Bats');

++#      ok(umu8_charset_name(" c p 1 0 0 7 9 ") eq "cp10079", ' c p 1 0 0 7 9 ');

+       } # SKIP block for Unicode::Map8 module

+  SKIP:

+       {


Modified: trunk/libi18n-charset-perl/t/utf8.t
URL: http://svn.debian.org/wsvn/trunk/libi18n-charset-perl/t/utf8.t?rev=15136&op=diff
==============================================================================
--- trunk/libi18n-charset-perl/t/utf8.t (original)
+++ trunk/libi18n-charset-perl/t/utf8.t Mon Feb 18 21:56:28 2008
@@ -39,11 +39,11 @@
       {

       skip 'Unicode::Map8 is not installed', 7 unless eval 'require Unicode::Map8';

       # Unicode::Map8 aliases:

-      ok(umu8_charset_name("Windows-1-2-5-1") eq "windows-1251", 'windows-1-2-5-1');

-      ok(umu8_charset_name("windows-1252") eq "windows-1252", 'windows-1252 eq');

-      ok(umu8_charset_name("win-latin-1") eq "windows-1252", 'win-latin-1');

-      ok(umu8_charset_name("windows-1252") ne "windows-1253", 'windows-1252 ne');

-      ok(umu8_charset_name("windows-1253") eq "windows-1253", 'windows-1253');

+      ok(umu8_charset_name("Windows-1-2-5-1") eq "cp1251", 'windows-1-2-5-1');

+      ok(umu8_charset_name("windows-1252") eq "cp1252", 'windows-1252 eq');

+      ok(umu8_charset_name("win-latin-1") eq "cp1252", 'win-latin-1');

+      ok(umu8_charset_name("windows-1252") ne "cp1253", 'windows-1252 ne');

+      ok(umu8_charset_name("windows-1253") eq "cp1253", 'windows-1253');

       # Unicode::Map8 names with dummy mib:

       ok(umu8_charset_name("Adobe Zapf Ding Bats") eq "Adobe-Zapf-Dingbats", 'Adobe Zapf Ding Bats');

       ok(umu8_charset_name(" c p 1 0 0 7 9 ") eq "cp10079", ' c p 1 0 0 7 9 ');





More information about the Pkg-perl-cvs-commits mailing list