From 0736de7268d9ac8d5edef06cb8838e19d9bfa667 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 11 Dec 2013 23:13:38 +0100 Subject: Add -v/--via filter --- bin/aseag-m | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'bin') diff --git a/bin/aseag-m b/bin/aseag-m index 62195d5..2c4e655 100755 --- a/bin/aseag-m +++ b/bin/aseag-m @@ -16,6 +16,7 @@ use Travel::Status::DE::ASEAG; my (@grep_lines); my $full_route = 0; my $hide_past = 1; +my $via; GetOptions( 'a|route-after' => sub { $full_route = 'after' }, @@ -24,6 +25,7 @@ GetOptions( 'f|full-route' => \$full_route, 'l|line=s@' => \@grep_lines, 'p|with-past' => sub { $hide_past = 0 }, + 'v|via=s' => \$via, 'V|version' => \&show_version, ) or show_help(1); @@ -90,6 +92,7 @@ sub show_results { full_routes => $full_route, hide_past => $hide_past, stop => $stop_name, + via => $via, ) ) { @@ -169,6 +172,12 @@ repeated) Also show departures in the past. Also appleas to the route information of B<-a> / B<-b> / B<-f>. +=item B<-v>, B<--via> I + +Only show lines which will also service I. With B<-b>, I must be +in the schedule before I, with B<-f> it may be anywhere, with B<-a> +(and by default) it must be after I. + =item B<-V>, B<--version> Show version information. -- cgit v1.2.3