Unverified Commit 16640da6 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

dbris-m: Add --with-polyline option

parent e8edff1a

bin/dbris-m

+9 −2
Original line number Diff line number Diff line
@@ -19,7 +19,7 @@ my $developer_mode; 
my $show_jid;

my $use_cache = 1;

my $cache;

my ( $json_output, $raw_json_output );

my ( $json_output, $raw_json_output, $with_polyline );



my %known_mot = map { $_ => 1 }

  (qw(ICE EC_IC IR REGIONAL SBAHN BUS SCHIFF UBAHN TRAM ANRUFPFLICHTIG));
@@ -48,6 +48,7 @@ GetOptions( 
	'devmode'              => \$developer_mode,

	'json'                 => \$json_output,

	'raw-json'             => \$raw_json_output,

	'with-polyline'        => \$with_polyline,



) or show_help(1);
@@ -92,6 +93,7 @@ elsif ( $opt{station} =~ m{ ^ [?] (?<query> .*) $ }x ) { 
}

elsif ( $opt{station} =~ m{[|]} ) {

	$opt{journey}       = $opt{station};

	$opt{with_polyline} = $with_polyline;

	delete $opt{station};

}

elsif ( $opt{station} =~ m{ [@] L = (?<eva> \d+ ) [@] }x ) {
@@ -675,6 +677,11 @@ Default: now. 


Show version information and exit.



=item B<--with-polyline> (trip details)



Request polyline (geocoordinates of the trip's route) from the backend.

Only sensible when combined with B<--json> or B<--raw-json>.



=back



=head1 EXIT STATUS