From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Mar 2019 00:51:38 +0000 (+0000)
Subject: move to TextAdjust
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=0488d1fd158bfd40ac7c14b0f3fb9115996ada36;p=pandemic-rising-tide.git

move to TextAdjust
---

diff --git a/generate-board b/generate-board
index 3587aa5..1c86a7f 100755
--- a/generate-board
+++ b/generate-board
@@ -452,8 +452,9 @@ sub label_faces() {
 			       + $hs_sz*0.15);
       one_hs($rr->{Colour}, $hspos);
     }
-    if ($rr->{Name} eq 'Zeeuws-Vlaanderen') {
-      $pos += $sz * mkvec(0.5, 0);
+    my $adjust = $c{TextAdjust}{$rr->{Name}};
+    if ($adjust) {
+      $pos += $sz * &mkvec(@$adjust);
     }
     if ($rr->{Name} eq 'Walcheren') {
       $pos += $sz * mkvec(0.6, 0.5);
diff --git a/misc-data.pl b/misc-data.pl
index e11bc38..cfdab9b 100644
--- a/misc-data.pl
+++ b/misc-data.pl
@@ -18,4 +18,7 @@ our %c =
  },
  HS => [ 'Roer en Overmaas', 'Schouwen-Duiveland', 'Rijn en Ijssel' ],
  SeaTrack => [qw(2 2 2 3 3 3 4 4 4)],
+ TextAdjust => {
+   'Zeeuws-Vlaanderen' => [0.5, 0],
+ }
 );