chiark / gitweb /
Revert "experimentally move sea track"
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 2 Mar 2019 23:46:32 +0000 (23:46 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 2 Mar 2019 23:46:32 +0000 (23:46 +0000)
This reverts commit e601079f84c2af9f11f4ab61122883696e78bfb9.

generate-board

index b2230c9570ef08289bb8d7214bdf019d65240e09..08a88db50631b9c0cdf6a8fe54c4048906764de0 100755 (executable)
@@ -319,7 +319,7 @@ sub preamble() {
 %%BeginSetup
 /board {
   gsave
-  30 -40 translate
+  40 0 translate
 END
   #o(" 0.52 dup scale\n") if $xopts =~ m/S/;
   #o("%%Box 0 0 $xsz $ysz");
@@ -534,8 +534,7 @@ sub decks(){
 
 sub sea_track(){
   o("% sea level track\n");
-  o("  gsave 440 1700 translate\n");
-  o("  -90 rotate\n");
+  o("  gsave 10 660 translate\n");
   my $track = $c{SeaTrack};
   my $token_sz = $hs_sz;
   my $dy = $token_sz * 1.25;