adjustments for printable bboxes

diff --git a/generate-board b/generate-board
index 9802ec7b3075dea15b5e783519829e9ae886af94..c86249562de964ce15756a1d8c19aacc67a1e246 100755 (executable)
--- a/generate-board
+++ b/generate-board
@@ -378,7 +378,7 @@ sub preamble() {
 &&BeginSetup
 /board {
   gsave
-  40 -26 translate
+  34 -15 translate
 END
   # xxx split into pages
   # xxx setpagedevice
@@ -611,14 +611,14 @@ sub decks(){
   o("    200 0 translate deck1path\n");
   o("  } bind def");
   o("  $lw setlinewidth 1 setgray\n");
-  o("  gsave 407 50 translate deckpairpathx stroke grestore");
+  o("  gsave 401 44 translate deckpairpathx stroke grestore");
   o("  $lw setlinewidth ",pscolour($c{Colours}{dykefail}),"\n");
-  o("  gsave 225 1355 translate 90 rotate deckpairpathx stroke grestore");
+  o("  gsave 242 1363 translate 90 rotate deckpairpathx stroke grestore");
 }
 
 sub sea_track(){
   o("% sea level track\n");
-  o("  gsave 0 660 translate\n");
+  o("  gsave 11 700 translate\n");
   my $track = $c{SeaTrack};
   my $token_sz = $hs_sz;
   my $dy = $token_sz * 1.25;