diff options
| -rwxr-xr-x | bin/efa | 7 | ||||
| -rw-r--r-- | lib/Travel/Routing/DE/EFA.pm | 4 |
2 files changed, 8 insertions, 3 deletions
@@ -165,6 +165,7 @@ GetOptions( bike|b date|d=s depart=s + devmode discover|D efa-url|u=s exclude|e=s@ @@ -274,7 +275,8 @@ if ( $opt->{discover} or $opt->{'auto-url'} ) { max_interchanges => $opt->{'max-change'}, num_results => $opt->{'num-connections'}, - lwp_options => { timeout => $opt->{timeout} }, + developer_mode => $opt->{devmode}, + lwp_options => { timeout => $opt->{timeout} }, ); }; if ($efa) { @@ -314,7 +316,8 @@ else { max_interchanges => $opt->{'max-change'}, num_results => $opt->{'num-connections'}, - lwp_options => { timeout => $opt->{timeout} }, + developer_mode => $opt->{devmode}, + lwp_options => { timeout => $opt->{timeout} }, ); }; } diff --git a/lib/Travel/Routing/DE/EFA.pm b/lib/Travel/Routing/DE/EFA.pm index fefc2bd..24ee7e1 100644 --- a/lib/Travel/Routing/DE/EFA.pm +++ b/lib/Travel/Routing/DE/EFA.pm @@ -659,7 +659,9 @@ sub parse_xml { string => $self->{xml_reply}, ); - #say $tree->toString(2); + if ( $self->{config}->{developer_mode} ) { + say $tree->toString(2); + } my $xp_element = XML::LibXML::XPathExpression->new( '//itdItinerary/itdRouteList/itdRoute'); |