From 0488d1fd158bfd40ac7c14b0f3fb9115996ada36 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Mar 2019 00:51:38 +0000
Subject: [PATCH] move to TextAdjust

---
 generate-board | 5 +++--
 misc-data.pl   | 3 +++
 2 files changed, 6 insertions(+), 2 deletions(-)

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],
+ }
 );
-- 
2.30.2