From b8c4107c0096a8d6db88cfe69dcc2c9f1530e07f Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Wed, 11 Dec 2013 18:27:22 +0100
Subject: allow stop / full_route parameter to be set in ->results

---
 bin/aseag-m | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

(limited to 'bin/aseag-m')

diff --git a/bin/aseag-m b/bin/aseag-m
index 1fb593f..5c2c453 100755
--- a/bin/aseag-m
+++ b/bin/aseag-m
@@ -33,15 +33,13 @@ if ( @ARGV != 1 ) {
 
 my ($stop_name) = @ARGV;
 
-my $status = Travel::Status::DE::ASEAG->new(
-	name        => $stop_name,
-	full_routes => $show_full_route
-);
+my $status = Travel::Status::DE::ASEAG->new;
 
 sub show_help {
 	my ($code) = @_;
 
-	print "Usage: aseag-m <stop name>\n" . "See also: man aseag-m\n";
+	print "Usage: B<aseag-m> [ B<-l> I<lines> ] [B<-f>] I< <stop name>\n"
+	  . "See also: man aseag-m\n";
 
 	exit $code;
 }
@@ -83,7 +81,13 @@ sub display_result {
 sub show_results {
 	my @output;
 
-	for my $d ( $status->results ) {
+	for my $d (
+		$status->results(
+			stop        => $stop_name,
+			full_routes => $show_full_route
+		)
+	  )
+	{
 
 		my $dtime = $d->time;
 
-- 
cgit v1.2.3