This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Missed updated a test description, as spotted by vincent.
authorNicholas Clark <nick@ccl4.org>
Sun, 6 Apr 2008 09:29:24 +0000 (09:29 +0000)
committerNicholas Clark <nick@ccl4.org>
Sun, 6 Apr 2008 09:29:24 +0000 (09:29 +0000)
p4raw-id: //depot/perl@33649

lib/Unicode/UCD.t

index 0c00c95..3362543 100644 (file)
@@ -325,7 +325,7 @@ is(Unicode::UCD::_getcode('U+123x'),  undef, "_getcode(x123)");
 {
     my $r1 = charscript('Latin');
     my $n1 = @$r1;
-    is($n1, 42, "number of ranges in Latin script (Unicode 5.0.0)");
+    is($n1, 42, "number of ranges in Latin script (Unicode 5.1.0)");
     shift @$r1 while @$r1;
     my $r2 = charscript('Latin');
     is(@$r2, $n1, "modifying results should not mess up internal caches");