From 6e82d91aabdbccc5dd49ce2cfe5a2340c510e112 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sun, 10 Mar 2019 22:08:31 +0000 Subject: [PATCH] move into misc-data.pl: NZ from generate-plag NFC --- generate-plag | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/generate-plag b/generate-plag index 1868acf..4253481 100755 --- 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"); -- 2.30.2