diff options
author | Daniel Friesel <derf@finalrewind.org> | 2014-03-03 13:28:08 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2014-03-03 13:28:08 +0100 |
commit | 890fb5128047594a327f4d0ef7c40f768d36b568 (patch) | |
tree | b4c531399094a0dfa365093814fbcee37c49199a /lib/Travel | |
parent | 444dad0d33aa2d0ca9750bbac49268489854ba4d (diff) |
add -f/--full-route option (show all interemdiate stops)
Diffstat (limited to 'lib/Travel')
-rw-r--r-- | lib/Travel/Routing/DE/EFA.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/Travel/Routing/DE/EFA.pm b/lib/Travel/Routing/DE/EFA.pm index 4047306..1b00300 100644 --- a/lib/Travel/Routing/DE/EFA.pm +++ b/lib/Travel/Routing/DE/EFA.pm @@ -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 ) ) { @@ -598,7 +601,7 @@ sub parse_xml { my $tree = $self->{tree} = XML::LibXML->load_xml( string => $self->{xml_reply}, ); - # say $tree->toString(2); + #say $tree->toString(2); my $xp_element = XML::LibXML::XPathExpression->new( '//itdItinerary/itdRouteList/itdRoute'); |