X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=printrule;h=e2db77cbf0c333eaf3894084bb55f5d3490566c5;hb=a3b48c9169bdcee86f0cafbc4b35630b720449c0;hp=4c16d9b4d451ee8bd138d165ba72cbbcc1c61d4a;hpb=b41d7c89cb4378b72d4da1e2362c6518097f8a8e;p=xfonts-traditional.git 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/\;$//;