summaryrefslogtreecommitdiff
path: root/lib/Travel/Routing/DE/HAFAS
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Travel/Routing/DE/HAFAS')
-rw-r--r--lib/Travel/Routing/DE/HAFAS/Connection.pm2
-rw-r--r--lib/Travel/Routing/DE/HAFAS/Connection/Section.pm3
-rw-r--r--lib/Travel/Routing/DE/HAFAS/Location.pm2
3 files changed, 3 insertions, 4 deletions
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));