diff options
-rwxr-xr-x | scripts/acronyms.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl index fd78b88..82e8b3f 100755 --- a/scripts/acronyms.pl +++ b/scripts/acronyms.pl @@ -1860,6 +1860,12 @@ sub get_station { return ($ds100_match); } + my $eva_match = firstval { defined $_->[2] and $name eq $_->[2] } @stations; + + if ($eva_match) { + return ($eva_match); + } + return get_station_by_name($name); } @@ -1890,7 +1896,6 @@ sub get_station_by_location { return @station_map; } - sub get_station_by_name { my ($name) = @_; |