From 263f9611d0d3090c4b5a48cdb8c3d98ef90c209c Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 24 May 2011 09:27:04 +0200 Subject: VRR.pm: Change new() key names --- bin/efa | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) (limited to 'bin') diff --git a/bin/efa b/bin/efa index a519b5d..12ab83a 100755 --- a/bin/efa +++ b/bin/efa @@ -77,21 +77,21 @@ for my $pair ( [ \@from, \$from_type ], [ \@via, \$via_type ], } $efa = Net::Travel::DE::VRR->new( - from => [ @from, $from_type ], - to => [ @to, $to_type ], + origin => [ @from, $from_type ], + destination => [ @to, $to_type ], via => ( @via ? [ @via, $via_type ] : undef ), - arrive => $opt->{'arrive'}, - depart => $opt->{'depart'} // $opt->{'time'}, - date => $opt->{'date'}, - exclude => $opt->{'exclude'}, - prefer => $opt->{'prefer'}, - include => $opt->{'include'}, - bike => $opt->{'bike'}, - - proximity => $opt->{'proximity'}, - walk_speed => $opt->{'walk-speed'}, - max_interchanges => $opt->{'max-change'}, + arrival_time => $opt->{'arrive'}, + departure_time => $opt->{'depart'} // $opt->{'time'}, + date => $opt->{'date'}, + exclude => $opt->{'exclude'}, + train_type => $opt->{'include'}, + with_bike => $opt->{'bike'}, + + select_interchange_by => $opt->{'prefer'}, + use_near_stops => $opt->{'proximity'}, + walk_speed => $opt->{'walk-speed'}, + max_interchanges => $opt->{'max-change'}, ); $efa->submit( timeout => $opt->{'timeout'} ); -- cgit v1.2.3