chiark / gitweb /
put %! at start
authorian <ian>
Thu, 5 Oct 2006 11:19:29 +0000 (11:19 +0000)
committerian <ian>
Thu, 5 Oct 2006 11:19:29 +0000 (11:19 +0000)
layout/layout

index 06dfb77e0f353728556a11c1edac3d3fd311fa71..bec971bdf548a9f7ea14f0a987c1985b81121411 100755 (executable)
@@ -1591,8 +1591,9 @@ sub cmd__one {
     cmd__do();
 }
 
-o("%!\n".
-  "  /lf /Courier-New findfont $lmu_marktpt scalefont def\n".
+print "%!\n" or die $!;
+
+o("  /lf /Courier-New findfont $lmu_marktpt scalefont def\n".
   "  $ps_page_shift 0 translate 90 rotate\n".
   "  gsave\n");