From: Karl Williamson <public@khwilliamson.com>
Date: Wed, 15 Jun 2011 21:48:00 +0000 (-0600)
Subject: charnames.t: Rmv duplicated test
X-Git-Tag: accepted/trunk/20130322.191538~3717
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=b17e42fe49ac2df2159376ef44fd8f417e8db0a3;p=platform%2Fupstream%2Fperl.git

charnames.t: Rmv duplicated test
---

diff --git a/lib/charnames.t b/lib/charnames.t
index dc6487a..62bb8ca 100644
--- 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;