Commit 065e00fd authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

efa: Added --proximity ("Berücksichtigung von Nachbarhaltestellen bei Start und Ziel")

parent 9c9c9cb9

bin/efa

+10 −0
Original line number Diff line number Diff line
@@ -23,6 +23,7 @@ my ($time, $time_depart, $time_arrive); 
my $date;

my $restrict;

my $prefer;

my $proximity;

my $debug = 0;

my $ignore_info = 'Fahrradmitnahme';

my ($i, $j, $con, $part);
@@ -121,6 +122,7 @@ GetOptions( 
	'ignore-info=s' => \$ignore_info,

	'post=s'    => \%post,

	'prefer=s'  => \$prefer,

	'proximity' => \$proximity,

	'restrict=s' => \$restrict,

	'time=s'    => \$time,

	'to=s{2}'   => \@to,
@@ -172,6 +174,10 @@ if ($prefer) { 
	}

}



if ($proximity) {

	$post{useProxFootSearch} = 1;

}



if ($restrict) {

	given ($restrict) {

		when('local') { $post{lineRestriction} = 403 }
@@ -300,6 +306,10 @@ Prefer connections with less walking (at interchanges) 


=back



=item B<--proximity>



Take stops close to the stop/start into account and possibly use them instead



=item B<--restrict> I<type>



Only accept connections using trains of type I<type>, where I<type> may be:

provides/zsh/completions/_efa

+1 −0
Original line number Diff line number Diff line
@@ -11,6 +11,7 @@ arguments=( 
	'(--arrive --time)--depart:time'

	'--date:date'

	'--prefer:type:(speed nowait nowalk)'

	'--proximity'

	'--restrict:type:(local ic ice)'

	'--ignore-info:regex'

	'*--post:POST key=value'