put %! at start but do not break segcmapreq

diff --git a/layout/layout b/layout/layout
index bec971bdf548a9f7ea14f0a987c1985b81121411..b9752ccd87ee3a3a35849e534e4110bfea3a7b18 100755 (executable)
--- a/layout/layout
+++ b/layout/layout
@@ -1591,9 +1591,8 @@ sub cmd__one {
     cmd__do();
 }
 
-print "%!\n" or die $!;
-
-o("  /lf /Courier-New findfont $lmu_marktpt scalefont def\n".
+o("%!\n".
+  "  /lf /Courier-New findfont $lmu_marktpt scalefont def\n".
   "  $ps_page_shift 0 translate 90 rotate\n".
   "  gsave\n");
 
@@ -1657,7 +1656,8 @@ while (<>) {
     if ($scale < 1.5) {
        my ($tick_x, $tick_y, $ticklen);
        $ticklen= 10;
-       printf("    gsave 0.5 setgray 0.33 setlinewidth\n".
+       printf("%%!\n".
+              "    gsave 0.5 setgray 0.33 setlinewidth\n".
               "      /regmark {\n".
               "        newpath moveto\n".
               "        -%d 0 rmoveto %d 0 rlineto\n".