From: ian <ian>
Date: Thu, 5 Oct 2006 11:24:35 +0000 (+0000)
Subject: put %! at start but do not break segcmapreq
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;ds=sidebyside;h=176a8974616525e5039e5ec3792bee3029c776d4;p=trains.git

put %! at start but do not break segcmapreq
---

diff --git a/layout/layout b/layout/layout
index bec971b..b9752cc 100755
--- 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".