21 lines
634 B
Diff
21 lines
634 B
Diff
|
|
--- efont-unicode-bdf-0.4.2-src/tools/hex2bdf.in_orig 2019-11-21 19:52:54.341747143 +0100
|
||
|
|
+++ efont-unicode-bdf-0.4.2-src/tools/hex2bdf.in 2019-11-21 19:53:57.469747085 +0100
|
||
|
|
@@ -14,7 +14,7 @@
|
||
|
|
|
||
|
|
|
||
|
|
while (<>) { $glyph{$1} = $2 if /(.{4,}):(.+)\n/; }
|
||
|
|
-@chars = sort keys %glyph; $[ = 1;
|
||
|
|
+@chars = sort keys %glyph;
|
||
|
|
#dbmopen (%charname, "/usr/share/unicode/unidata/charname.db", 0);
|
||
|
|
|
||
|
|
print "STARTFONT 2.1\n";
|
||
|
|
@@ -55,7 +55,7 @@
|
||
|
|
FONT_DESCENT 2
|
||
|
|
DEFAULT_CHAR $default_char
|
||
|
|
ENDPROPERTIES
|
||
|
|
-CHARS $#chars\n";
|
||
|
|
+CHARS " . scalar(@chars) . "\n";
|
||
|
|
|
||
|
|
foreach $character (@chars) {
|
||
|
|
$encoding = hex($character); $glyph = $glyph{$character};
|