Clip character names to boxes in glyph complement.

Ideally, I'd do something more elegant with over-long glyph names, but
at least keeping them in the boxes doesn't look terrible.

diff --git a/bedstead.c b/bedstead.c
index aecc904b1c5768c5c01ce9062db94ca4ef10b807..59fffe6bdd31bfef68185326f027e499028576de 100644 (file)
--- a/bedstead.c
+++ b/bedstead.c
@@ -2328,13 +2328,13 @@ glyph_complement()
        /* unicode glyphname  exemplify -- */
        printf("/exemplify {\n");
        printf(" xfont setfont dup 14 14 moveto glyphshow\n");
+       printf(" 0 0 moveto 0 40 lineto 40 40 lineto 40 0 lineto closepath\n");
+       printf("  1 setlinewidth gsave stroke grestore clip\n");
        printf(" 0.1 setlinewidth\n");
        printf("  14 10 moveto 14 30 lineto 26 30 lineto 26 10 lineto\n");
        printf("  closepath stroke\n");
        printf(" 20 36 moveto str cvs label\n");
        printf(" 20 2 moveto label\n");
-       printf(" 0 0 moveto 0 40 lineto 40 40 lineto 40 0 lineto closepath\n");
-       printf("  1 setlinewidth stroke\n");
        printf("} def\n");
        printf("/colnum {\n");
        printf(" nfont setfont 20 42 moveto centre\n");