remove dead code

p4raw-id: //depot/perl@5821

diff --git a/lib/charnames.pm b/lib/charnames.pm
index 21b4dd6..7c2209b 100644 (file)
--- a/lib/charnames.pm
+++ b/lib/charnames.pm
@@ -2,7 +2,6 @@ package charnames;
 use bytes ();          # for $bytes::hint_bits
 $charnames::hint_bits = 0x20000;
 
-my $fname = 'unicode/UnicodeData-Latest.txt';
 my $txt;
 
 # This is not optimized in any way yet