summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rwxr-xr-xbin/hafas-m13
1 files changed, 13 insertions, 0 deletions
diff --git a/bin/hafas-m b/bin/hafas-m
index f3fbc39..8125d96 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -176,6 +176,19 @@ sub show_similar_stops {
for my $c (@candidates) {
printf( "%s (%s)\n", $c->{name}, $c->{id} );
}
+ return;
+ }
+ my $hafas = Travel::Status::DE::HAFAS->new(
+ locationSearch => $opt{station},
+ developer_mode => $developer_mode,
+ service => $service,
+ language => $language,
+ );
+ if ( $hafas->results ) {
+ say 'You might want to try one of the following stops:';
+ for my $r ( $hafas->results ) {
+ printf( "%s (%s)\n", $r->name, $r->eva );
+ }
}
return;
}