X-Git-Url: http://git.shiar.net/unifont.git/blobdiff_plain/48e3a36faf203c4d25e024994f103fce1fcc8fca..fc551ca87db118182bb4292bc08fc5fc03ea3f89:/src/hex2bdf diff --git a/src/hex2bdf b/src/hex2bdf index 18d1d16..5255120 100755 --- a/src/hex2bdf +++ b/src/hex2bdf @@ -44,7 +44,7 @@ if (not $version) { $point_size = $vpixels; $point_size10 = 10 * $point_size; -while (<>) { chomp; $glyph{$1} = $2 if /(....):(.+)/; } +while (<>) { chomp; $glyph{$1} = $2 if /^([0-9a-fA-F]+):([0-9a-fA-F]+)/; } @chars = sort keys %glyph; $nchars = $#chars + 1; @@ -79,7 +79,7 @@ FONT_ASCENT 14 FONT_DESCENT 2 DEFAULT_CHAR 65533 ENDPROPERTIES -CHARS $nchars\n"; +CHARS $nchars\n" or die ("Cannot print to stdout.\n"); # TODO: $swidth needs to be modified to accomodate different widths better # for glyphs with height different than 16 pixels. @@ -101,7 +101,7 @@ SWIDTH $swidth 0 DWIDTH $dwidth 0 BBX $dwidth $vpixels 0 -2 BITMAP $glyph -ENDCHAR\n"; +ENDCHAR\n" or die ("Cannot print to stdout.\n"); } -print "ENDFONT\n"; +print "ENDFONT\n" or die ("Cannot print to stdout.\n");