summaryrefslogtreecommitdiff
path: root/cpan/Encode/t
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2014-11-27 22:27:32 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2014-11-27 22:27:32 +0000
commit2e0c081329a0b25faea3ba31f4016998ec65285c (patch)
tree0db5e1f1960dbca6d9f2ed73d5b0cc95c830b577 /cpan/Encode/t
parent51418c6ac55f33024e046e599878137a9e0a2e7d (diff)
downloadperl-2e0c081329a0b25faea3ba31f4016998ec65285c.tar.gz
Update Encode to CPAN version 2.65
[DELTA] $Revision: 2.65 $ $Date: 2014/11/27 14:08:33 $ ! Changes Encode.xs bin/enc2xs Applied 3 patches from jhi: 0001-For-C-don-t-use-the-array-size-in-forward-declaratiotion 0002-Unused-variables 0003-1-needs-casting-to-STRLEN Message-Id: <54753674.6070909@iki.fi>
Diffstat (limited to 'cpan/Encode/t')
-rw-r--r--cpan/Encode/t/encoding.t9
1 files changed, 1 insertions, 8 deletions
diff --git a/cpan/Encode/t/encoding.t b/cpan/Encode/t/encoding.t
index 847c26f643..8c7f253377 100644
--- a/cpan/Encode/t/encoding.t
+++ b/cpan/Encode/t/encoding.t
@@ -14,7 +14,7 @@ BEGIN {
}
}
-print "1..33\n";
+print "1..31\n";
no warnings "deprecated";
use encoding "latin1"; # ignored (overwritten by the next line)
@@ -202,10 +202,3 @@ print "ok 28\n";
print $h1{"\x{3af}"} == 41 ? "ok 30\n" : "not ok 30\n";
print $h2{"\xdf"} == 42 ? "ok 31\n" : "not ok 31\n";
}
-
-# Order of finding the above-Latin1 code point should not matter: both should
-# assume Latin1/Unicode encoding
-print "not " if "\xDF\x{100}" =~ /\x{3af}\x{100}/;
-print "ok 32\n";
-print "not " if "\x{100}\xDF" =~ /\x{100}\x{3af}/;
-print "ok 33\n";