X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=xfonts-traditional.git;a=blobdiff_plain;f=printrule;h=e2db77cbf0c333eaf3894084bb55f5d3490566c5;hp=4c16d9b4d451ee8bd138d165ba72cbbcc1c61d4a;hb=3b801dd7a6124dded55f1aa51a980456c6dc0a30;hpb=482c639e791ab9f89d2af07033f4469a023c5068 diff --git a/printrule b/printrule index 4c16d9b..e2db77c 100755 --- a/printrule +++ b/printrule @@ -30,7 +30,7 @@ sub get ($) { } my $glyph=''; for (my $y=0; $y<$height; $y++) { - <$f> =~ m/^([0-9a-f]+)$/i or die "$p $_ ?"; + <$f> =~ m/^([0-9a-f]+)$/i or die "$y $height $p $_ ?"; $glyph.="$1;"; } $glyph =~ s/\;$//;