diff options
Diffstat (limited to 'lib/Travel/Routing')
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS.pm | 2 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Connection.pm | 2 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Connection/Section.pm | 3 | ||||
-rw-r--r-- | lib/Travel/Routing/DE/HAFAS/Location.pm | 2 |
4 files changed, 4 insertions, 5 deletions
diff --git a/lib/Travel/Routing/DE/HAFAS.pm b/lib/Travel/Routing/DE/HAFAS.pm index f6cf6a1..32eb6f0 100644 --- a/lib/Travel/Routing/DE/HAFAS.pm +++ b/lib/Travel/Routing/DE/HAFAS.pm @@ -18,7 +18,7 @@ use Travel::Routing::DE::HAFAS::Connection; use Travel::Routing::DE::HAFAS::Location; use Travel::Status::DE::HAFAS::Message; -our $VERSION = '0.00'; +our $VERSION = '0.01'; # {{{ Endpoint Definition diff --git a/lib/Travel/Routing/DE/HAFAS/Connection.pm b/lib/Travel/Routing/DE/HAFAS/Connection.pm index ffb9702..bc587fc 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.00'; +our $VERSION = '0.01'; 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) diff --git a/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm b/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm index b3f2273..f4ddb35 100644 --- a/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm +++ b/lib/Travel/Routing/DE/HAFAS/Connection/Section.pm @@ -10,7 +10,7 @@ use parent 'Class::Accessor'; use DateTime::Duration; use Travel::Routing::DE::HAFAS::Utils; -our $VERSION = '0.00'; +our $VERSION = '0.01'; 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 @@ -125,7 +125,6 @@ sub new { my @stops; for my $stop ( @{ $journey->{stopL} // [] } ) { my $loc = $locs->[ $stop->{locX} ]; - say $loc->name; } } elsif ( $sec->{type} eq 'WALK' ) { diff --git a/lib/Travel/Routing/DE/HAFAS/Location.pm b/lib/Travel/Routing/DE/HAFAS/Location.pm index aef6a52..a852a55 100644 --- a/lib/Travel/Routing/DE/HAFAS/Location.pm +++ b/lib/Travel/Routing/DE/HAFAS/Location.pm @@ -6,7 +6,7 @@ use 5.014; use parent 'Class::Accessor'; -our $VERSION = '0.00'; +our $VERSION = '0.01'; Travel::Routing::DE::HAFAS::Location->mk_ro_accessors( qw(lid type name eva state coordinate)); |