From: Ian Jackson Date: Sun, 10 Mar 2019 20:02:11 +0000 (+0000) Subject: move into misc-data.pl: PA HS X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=343936a93ecb88a3a0dcc11cdcc11b7997bfa3ae;p=pandemic-rising-tide.git move into misc-data.pl: PA HS NFC --- diff --git a/generate-board b/generate-board index ae1568a..109e84d 100755 --- a/generate-board +++ b/generate-board @@ -686,9 +686,7 @@ END #print STDERR "adjust hs $rr->{Name}\n"; my $posadj = $c{PA_HS_HS}{$rr->{Colour}}; $posadj //= [0,0]; - $pos -= mkvec(0, -$hs_sz * 0.65 - -$hs_sz * - ( $rr->{Colour} eq 'green' ? -0.40 : 0.0 )); + $pos -= mkvec(0, -$hs_sz * 0.65); $pos += &mkvec(@$posadj) * $hs_sz; my $hspos = $pos - mkvec(0, $sz * @$words + $hs_sz/2 + $hs_lw + $hs_sz*0.15); diff --git a/misc-data.pl b/misc-data.pl index 647ed24..65b5285 100644 --- a/misc-data.pl +++ b/misc-data.pl @@ -67,7 +67,7 @@ END Overall => [ 34, -15 ], OverallOn => { a4 => [ 0, -17 ] }, }, - PA_HS_HS => { green => [0, 0] }, + PA_HS_HS => { green => [0, -0.40] }, PA_Outercoast_Vertices => [ { Re => qr{Noorderzijlvest}, PA => [ 100,-50 ] }, ],