diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/hafas | 12 |
1 files changed, 9 insertions, 3 deletions
@@ -77,15 +77,21 @@ if ($list_services) { parse_mot_options(); -my ( $from_stop, $to_stop ) = @ARGV; +my ( $from_stop, $via_stop, $to_stop ) = @ARGV; -if ( not $from_stop and $to_stop ) { +if ( $via_stop and not $to_stop ) { + $to_stop = $via_stop; + $via_stop = undef; +} + +if ( not( $from_stop and $to_stop ) ) { show_help(1); } my %opt = ( service => $service, from_stop => $from_stop, + via_stop => $via_stop, to_stop => $to_stop, excluded_mots => \@excluded_mots, exclusive_mots => \@exclusive_mots, @@ -450,7 +456,7 @@ hafas - Interface to HAFAS (e.g. Deutsche Bahn) itinerary services =head1 SYNOPSIS B<hafas> [B<-d> I<date>] [B<-t> I<time>] [B<-m> I<motlist>] -[B<-s> I<service>] [B<-l> I<language>] [B<-v>] I<from> I<to> +[B<-s> I<service>] [B<-l> I<language>] [B<-v>] I<from> [I<via>] I<to> =head1 VERSION |