if (!defined $wtarch) {
error("island from chart not found on ocean page: $island");
} elsif (defined $wiarch and $wtarch ne $wiarch) {
- error("island in $wtarch on ocean page but".
+# error("island in $wtarch on ocean page but".
+ warning("island in $wtarch on ocean page but".
" concluded $wiarch from chart: $island");
}
}