bdfnorm: Capitalise the bdfs, as the rule generator expects

diff --git a/bdfnorm b/bdfnorm
index 87aed71e85ca6d6801ffedf05b68fd4721efa10b..0b02834fc73db64a9f3b2795ed8c26176e1aeb2a 100755 (executable)
--- a/bdfnorm
+++ b/bdfnorm
@@ -48,6 +48,7 @@ while (<>) {
        $_ .= "0" x ($numbytes*8 - length);
 #      print "# $_\n";
        $_ = unpack "H*", pack "B*", $_;
        $_ .= "0" x ($numbytes*8 - length);
 #      print "# $_\n";
        $_ = unpack "H*", pack "B*", $_;

+       $_ = uc $_;

        $_ .= "\n";
     }
     print;
        $_ .= "\n";
     }
     print;