move into misc-data.pl: NZ from generate-plag

NFC

diff --git a/generate-plag b/generate-plag
index 1868acf4ed17e989d8fc52393b8dc1913d21a3e9..425348121378074dece845bc9a82ceb1dc991530 100755 (executable)
--- a/generate-plag
+++ b/generate-plag
@@ -10,7 +10,7 @@ use Parse;
 sub output_planar_graph () {
   foreach my $ra (sort keys %region) {
     o(plag_prs($ra), "\n");
-    if ($ra eq 'NZ' || $ra =~ m/^L2?$/) { o(" :outer\n"); }
+    if ($ra eq $c{Sea} || $ra =~ m/^L2?$/) { o(" :outer\n"); }
     my $adjs = $region{$ra}{Adj};
     foreach my $adj (reverse @$adjs) {
       o(" ", plag_prs($adj->{Name}), "\n");