projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
69ccf20
)
charnames.t: Rmv duplicated test
author
Karl Williamson
<public@khwilliamson.com>
Wed, 15 Jun 2011 21:48:00 +0000
(15:48 -0600)
committer
Karl Williamson
<public@khwilliamson.com>
Thu, 16 Jun 2011 00:29:01 +0000
(18:29 -0600)
lib/charnames.t
patch
|
blob
|
history
diff --git
a/lib/charnames.t
b/lib/charnames.t
index
dc6487a
..
62bb8ca
100644
(file)
--- a/
lib/charnames.t
+++ b/
lib/charnames.t
@@
-1090,7
+1090,6
@@
is("\N{U+1D0C5}", "\N{BYZANTINE MUSICAL SYMBOL FTHORA SKLIRON CHROMA VASIS}");
my ($name, $codes) = split ";";
my $utf8 = pack("U*", map { hex } split " ", $codes);
is(charnames::string_vianame($name), $utf8, "Verify string_vianame(\"$name\") is the proper utf8");
- is(charnames::string_vianame($name), $utf8, "Verify string_vianame(\"$name\") is the proper utf8");
#diag("$name, $utf8");
}
close $fh;