From ffbf7ca613885ce8093cc4325d04cd14e147ab80 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 16 Jun 2015 22:28:53 +0200 Subject: parse footpaths, print them when efa -E is used --- lib/Travel/Routing/DE/EFA/Route/Part.pm | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) (limited to 'lib/Travel/Routing/DE/EFA') diff --git a/lib/Travel/Routing/DE/EFA/Route/Part.pm b/lib/Travel/Routing/DE/EFA/Route/Part.pm index 29d81fd..cc52f80 100644 --- a/lib/Travel/Routing/DE/EFA/Route/Part.pm +++ b/lib/Travel/Routing/DE/EFA/Route/Part.pm @@ -13,7 +13,9 @@ Travel::Routing::DE::EFA::Route::Part->mk_ro_accessors( arrival_date arrival_time arrival_sdate arrival_stime delay departure_platform departure_stop departure_date departure_time departure_sdate - departure_stime train_destination train_line train_product + departure_stime + footpath_duration footpath_type + train_destination train_line train_product ) ); @@ -71,6 +73,15 @@ sub departure_stop_and_platform { return $self->departure_stop; } +sub footpath_parts { + my ($self) = @_; + + if ( $self->{footpath_parts} ) { + return @{ $self->{footpath_parts} }; + } + return; +} + sub extra { my ($self) = @_; -- cgit v1.2.3