Commit 890fb512 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

add -f/--full-route option (show all interemdiate stops)

parent 444dad0d

Changelog

+1 −0
Original line number Diff line number Diff line
@@ -2,6 +2,7 @@ git HEAD 


    * Improve error message for unparsable (or missing) route data

    * Add option to specify maximum number of connections

    * efa: add -f / --full-route option



Travel::Routing::DE::VRR 2.04 - Tue Jan 07 2014

bin/efa

+13 −0
Original line number Diff line number Diff line
@@ -131,6 +131,13 @@ sub display_connection { 
		$c->train_line,     $c->train_destination,

	);



	if ( $opt->{'full-route'} ) {

		for my $via_stop ( $c->via ) {

			printf( "%-5s     %-30s %s\n",

				$via_stop->[1], $via_stop->[2], $via_stop->[3] );

		}

	}



	printf( "%-5s an  %s\n\n",

		$c->arrival_time, $c->arrival_stop_and_platform,

	);
@@ -152,6 +159,7 @@ GetOptions( 
		exclude|e=s@

		extended-info|E

		from=s@{2}

		full-route|f

		help|h

		ignore-info|I:s

		max-change|m=i
@@ -328,6 +336,11 @@ schnellbus, seilbahn, schiff, ast, sonstige 


Display duration, ticket class and price for each route (if available)



=item B<-f>|B<--full-route>



Display intermediate stops (with time and platform) of each train.  Note that

these are not always available.



=item B<-m>|B<--max-change> I<number>



Print connections with at most I<number> interchanges

lib/Travel/Routing/DE/EFA.pm

+4 −1
Original line number Diff line number Diff line
@@ -411,6 +411,9 @@ sub new { 
		);

	}



	#	$ref->{config}->{rm_base} //= 'http://efa.vrr.de/vrr/';

	#	$ref->{config}->{sm_base} //= 'http://efa.vrr.de/download/envmaps/';



	$ref->create_post;



	if ( not( defined $conf{submit} and $conf{submit} == 0 ) ) {