summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2014-11-24 13:21:47 +0100
committerDaniel Friesel <derf@finalrewind.org>2014-11-24 13:21:47 +0100
commitaf3e174aaf9d2560fcc49ebc6f6ea5e24545fbac (patch)
tree57cdbfa26cd0d7d3616231d638ef567724b92426
parentb295d78bcf305cf222c65fc2cad0c52ae3d42793 (diff)
Stations.pm: get_station_by_name returns an array
-rw-r--r--lib/Travel/Status/DE/IRIS/Stations.pm2
-rwxr-xr-xscripts/acronyms.pl2
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm
index b8dd855..1339471 100644
--- a/lib/Travel/Status/DE/IRIS/Stations.pm
+++ b/lib/Travel/Status/DE/IRIS/Stations.pm
@@ -15257,7 +15257,7 @@ sub get_station_by_name {
$nname = normalize($nname);
$actual_match = firstval { $nname eq normalize( lc( $_->[1] ) ) } @stations;
if ($actual_match) {
- return $actual_match;
+ return ($actual_match);
}
return ( grep { $_->[1] =~ m{$name}i } @stations );
diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl
index 73cb817..7bb187f 100755
--- a/scripts/acronyms.pl
+++ b/scripts/acronyms.pl
@@ -84,7 +84,7 @@ sub get_station_by_name {
$nname = normalize($nname);
$actual_match = firstval { $nname eq normalize(lc($_->[1])) } @stations;
if ($actual_match) {
- return $actual_match;
+ return ($actual_match);
}
return ( grep { $_->[1] =~ m{$name}i } @stations );