diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS.pm | 4 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Connection.pm | 7 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Connection/Section.pm | 4 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Utils.pm | 4 |
4 files changed, 12 insertions, 7 deletions
diff --git a/lib/Travel/Routing/DE/HAFAS.pm b/lib/Travel/Routing/DE/HAFAS.pm index ee846ba..53fbb46 100644 --- a/lib/Travel/Routing/DE/HAFAS.pm +++ b/lib/Travel/Routing/DE/HAFAS.pm @@ -19,7 +19,7 @@ use Travel::Status::DE::HAFAS; use Travel::Status::DE::HAFAS::Location; use Travel::Status::DE::HAFAS::Message; -our $VERSION = '0.06'; +our $VERSION = '0.08'; # {{{ Endpoint Definition @@ -535,7 +535,7 @@ Travel::Routing::DE::HAFAS - Interface to HAFAS itinerary services =head1 VERSION -version 0.06 +version 0.08 =head1 DESCRIPTION diff --git a/lib/Travel/Routing/DE/HAFAS/Connection.pm b/lib/Travel/Routing/DE/HAFAS/Connection.pm index 05341cc..a51389f 100644 --- a/lib/Travel/Routing/DE/HAFAS/Connection.pm +++ b/lib/Travel/Routing/DE/HAFAS/Connection.pm @@ -11,7 +11,7 @@ use DateTime::Duration; use Travel::Routing::DE::HAFAS::Utils; use Travel::Routing::DE::HAFAS::Connection::Section; -our $VERSION = '0.06'; +our $VERSION = '0.08'; Travel::Routing::DE::HAFAS::Connection->mk_ro_accessors( qw(changes duration sched_dep rt_dep sched_arr rt_arr dep arr dep_platform arr_platform dep_loc arr_loc dep_cancelled arr_cancelled is_cancelled load) @@ -89,6 +89,9 @@ sub new { my @sections; for my $sec (@secL) { + if ( $sec->{type} eq 'WALK' and not $sec->{gis}{durS} ) { + next; + } push( @sections, Travel::Routing::DE::HAFAS::Connection::Section->new( @@ -210,7 +213,7 @@ Travel::Routing::DE::HAFAS::Connection - A single connection between two stops =head1 VERSION -version 0.06 +version 0.08 =head1 DESCRIPTION diff --git a/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm b/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm index 477900f..b57a391 100644 --- a/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm +++ b/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm @@ -11,7 +11,7 @@ use DateTime::Duration; use Travel::Routing::DE::HAFAS::Utils; use Travel::Status::DE::HAFAS::Journey; -our $VERSION = '0.06'; +our $VERSION = '0.08'; Travel::Routing::DE::HAFAS::Connection::Section->mk_ro_accessors( qw(type schep_dep rt_dep sched_arr rt_arr dep arr arr_delay dep_delay journey distance duration transfer_duration dep_loc arr_loc @@ -212,7 +212,7 @@ Travel::Routing::DE::HAFAS::Connection::Section - A single trip between two stop =head1 VERSION -version 0.06 +version 0.08 =head1 DESCRIPTION diff --git a/lib/Travel/Routing/DE/HAFAS/Utils.pm b/lib/Travel/Routing/DE/HAFAS/Utils.pm index 45ee5db..3c7f8c0 100644 --- a/lib/Travel/Routing/DE/HAFAS/Utils.pm +++ b/lib/Travel/Routing/DE/HAFAS/Utils.pm @@ -9,6 +9,8 @@ use 5.014; use parent 'Exporter'; our @EXPORT = qw(handle_day_change); +our $VERSION = '0.08'; + sub handle_day_change { my (%opt) = @_; my $datestr = $opt{date}; @@ -53,7 +55,7 @@ None. =head1 VERSION -version 0.06 +version 0.08 =head1 METHODS |