summaryrefslogtreecommitdiff
path: root/bin/hafas-m
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2015-09-22 16:45:52 +0200
committerDaniel Friesel <derf@finalrewind.org>2015-09-22 16:45:52 +0200
commit38565092afcfafbd65fe0a76bd302c454c40c608 (patch)
tree995f925a1e268201fd17e4e898ea57ac8f23a4f0 /bin/hafas-m
parent06e7486d854c0ec32bceb83d2074d48888db4fc7 (diff)
get_(active_)service: return hashrefs after all, not hashes
Diffstat (limited to 'bin/hafas-m')
-rwxr-xr-xbin/hafas-m6
1 files changed, 3 insertions, 3 deletions
diff --git a/bin/hafas-m b/bin/hafas-m
index 5476cb5..e667a66 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -91,9 +91,9 @@ sub parse_mot_options {
if ( not $hafas_url ) {
$service //= 'DB';
}
- my %desc = Travel::Status::DE::HAFAS::get_service($service);
- if (%desc) {
- my @mots = @{ $desc{productbits} };
+ my $desc = Travel::Status::DE::HAFAS::get_service($service);
+ if ($desc) {
+ my @mots = @{ $desc->{productbits} };
@mots = grep { $_ ne 'x' } @mots;
@mots = uniq @mots;
@mots = sort @mots;