Blame SOURCES/perl-Unicode-String-2.09-undefined.patch

96a9a5
diff -ru libunicode-string-perl-2.09.pristine/lib/Unicode/CharName.pm libunicode-string-perl-2.09/lib/Unicode/CharName.pm
96a9a5
--- libunicode-string-perl-2.09.pristine/lib/Unicode/CharName.pm	2005-10-25 19:11:00.000000000 +0100
96a9a5
+++ libunicode-string-perl-2.09/lib/Unicode/CharName.pm	2012-01-24 12:56:59.730653088 +0000
96a9a5
@@ -77,7 +77,7 @@
96a9a5
 	    return join("", "HANGUL SYLLABLE ", @s)
96a9a5
 	}
96a9a5
     }
96a9a5
-    _init_names() unless defined %NAMES;
96a9a5
+    _init_names() unless %NAMES;
96a9a5
     $NAMES{sprintf("%04X",$code)}
96a9a5
 }
96a9a5