summaryrefslogtreecommitdiff
path: root/bin/hafas-m
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2015-09-22 16:32:23 +0200
committerDaniel Friesel <derf@finalrewind.org>2015-09-22 16:32:23 +0200
commit06e7486d854c0ec32bceb83d2074d48888db4fc7 (patch)
treeb6c94f5e8dafd990b9948a355ad5897a6289ad57 /bin/hafas-m
parentbdd029cdf9eb159d05155a0fb19b5964f52e2138 (diff)
perlcritic
Diffstat (limited to 'bin/hafas-m')
-rwxr-xr-xbin/hafas-m5
1 files changed, 3 insertions, 2 deletions
diff --git a/bin/hafas-m b/bin/hafas-m
index 97ecaa2..5476cb5 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -85,10 +85,9 @@ sub show_version {
sub parse_mot_options {
my $default_yes = 1;
- my $help;
for my $type ( split( qr{,}, $types ) ) {
- if ( $type eq 'help' or $type eq 'list' or $type eq '?' ) {
+ if ( $type eq 'help' or $type eq 'list' or $type eq q{?} ) {
if ( not $hafas_url ) {
$service //= 'DB';
}
@@ -113,6 +112,7 @@ sub parse_mot_options {
push( @exclusive_mots, $type );
}
}
+ return;
}
sub show_similar_stops {
@@ -123,6 +123,7 @@ sub show_similar_stops {
printf( "%s (%s)\n", $c->{name}, $c->{id} );
}
}
+ return;
}
sub display_result {