chiark / gitweb /
land
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 1 Mar 2019 13:06:05 +0000 (13:06 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 1 Mar 2019 13:06:05 +0000 (13:06 +0000)
generate-board
misc-data.pl

index 76f3849e8425ff203af518282037e953a223f3fa..6d857222d7941175d4fc808cf4011ebf964fc113 100755 (executable)
@@ -287,6 +287,7 @@ sub pscolour ($) {
 }
 
 sub fill_faces() {
+  o("clippath ", pscolour($c{Colours}{land}), " fill\n");
   foreach my $rr (values %region) {
     next if $rr->{Name} eq 'L';
     face_path($rr);
index 86032b950ac01c027e1e409c54c8edf9f5e319b1..8514dce32abc1980bbf677b1f98252184eef15e9 100644 (file)
@@ -10,5 +10,6 @@ our %c =
      red    => 'f50',
      high   => '888',
      sea    => '88f',
+     land   => '922',
  },
 );