Do not warn that an infinity does not look like a number.

[p5sagit/p5-mst-13.2.git] / lib / charnames.pm

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