summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/Travel/Status/DE/HAFAS.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Journey.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Location.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Message.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Polyline.pm2
-rw-r--r--lib/Travel/Status/DE/HAFAS/Product.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Services.pm.PL2
-rw-r--r--lib/Travel/Status/DE/HAFAS/Stop.pm10
-rw-r--r--lib/Travel/Status/DE/HAFAS/StopFinder.pm4
9 files changed, 20 insertions, 18 deletions
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm
index 2eb3dcf..fae1ed0 100644
--- a/lib/Travel/Status/DE/HAFAS.pm
+++ b/lib/Travel/Status/DE/HAFAS.pm
@@ -23,7 +23,7 @@ use Travel::Status::DE::HAFAS::Product;
use Travel::Status::DE::HAFAS::Services;
use Travel::Status::DE::HAFAS::StopFinder;
-our $VERSION = '6.19';
+our $VERSION = '6.20';
# {{{ Endpoint Definition
@@ -913,7 +913,7 @@ monitors
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index 4ee05d8..ad2d67e 100644
--- a/lib/Travel/Status/DE/HAFAS/Journey.pm
+++ b/lib/Travel/Status/DE/HAFAS/Journey.pm
@@ -11,7 +11,7 @@ use DateTime::Format::Strptime;
use List::Util qw(any uniq);
use Travel::Status::DE::HAFAS::Stop;
-our $VERSION = '6.19';
+our $VERSION = '6.20';
Travel::Status::DE::HAFAS::Journey->mk_ro_accessors(
qw(datetime sched_datetime rt_datetime tz_offset
@@ -437,7 +437,7 @@ journey received by Travel::Status::DE::HAFAS
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Location.pm b/lib/Travel/Status/DE/HAFAS/Location.pm
index c53e5b2..13837d8 100644
--- a/lib/Travel/Status/DE/HAFAS/Location.pm
+++ b/lib/Travel/Status/DE/HAFAS/Location.pm
@@ -6,7 +6,7 @@ use 5.014;
use parent 'Class::Accessor';
-our $VERSION = '6.19';
+our $VERSION = '6.20';
Travel::Status::DE::HAFAS::Location->mk_ro_accessors(
qw(lid type name eva state lat lon distance_m weight));
@@ -57,7 +57,7 @@ Travel::Status::DE::HAFAS::Location - A single public transit location
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm
index 3b951f0..a63dfec 100644
--- a/lib/Travel/Status/DE/HAFAS/Message.pm
+++ b/lib/Travel/Status/DE/HAFAS/Message.pm
@@ -6,7 +6,7 @@ use 5.014;
use parent 'Class::Accessor';
-our $VERSION = '6.19';
+our $VERSION = '6.20';
Travel::Status::DE::HAFAS::Message->mk_ro_accessors(
qw(short type text code prio is_him ref_count));
@@ -69,7 +69,7 @@ Travel::Status::DE::HAFAS::Message - An arrival/departure-related message.
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm
index b3cd07e..8338489 100644
--- a/lib/Travel/Status/DE/HAFAS/Polyline.pm
+++ b/lib/Travel/Status/DE/HAFAS/Polyline.pm
@@ -16,7 +16,7 @@ use 5.014;
use parent 'Exporter';
our @EXPORT_OK = qw(decode_polyline);
-our $VERSION = '6.19';
+our $VERSION = '6.20';
# Translated this php script
# <http://unitstep.net/blog/2008/08/02/decoding-google-maps-encoded-polylines-using-php/>
diff --git a/lib/Travel/Status/DE/HAFAS/Product.pm b/lib/Travel/Status/DE/HAFAS/Product.pm
index 833a93c..ff3fbfb 100644
--- a/lib/Travel/Status/DE/HAFAS/Product.pm
+++ b/lib/Travel/Status/DE/HAFAS/Product.pm
@@ -8,7 +8,7 @@ use 5.014;
use parent 'Class::Accessor';
-our $VERSION = '6.19';
+our $VERSION = '6.20';
Travel::Status::DE::HAFAS::Product->mk_ro_accessors(
qw(class line_id line_no name number type type_long operator));
@@ -105,7 +105,7 @@ associated with a journey.
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Services.pm.PL b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
index 5b0d956..7740d29 100644
--- a/lib/Travel/Status/DE/HAFAS/Services.pm.PL
+++ b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
@@ -242,7 +242,7 @@ use warnings;
use 5.014;
use utf8;
-our $VERSION = '6.19';
+our $VERSION = '6.20';
# Most of these have been adapted from
# <https://github.com/public-transport/transport-apis> and
diff --git a/lib/Travel/Status/DE/HAFAS/Stop.pm b/lib/Travel/Status/DE/HAFAS/Stop.pm
index 48b256e..acee919 100644
--- a/lib/Travel/Status/DE/HAFAS/Stop.pm
+++ b/lib/Travel/Status/DE/HAFAS/Stop.pm
@@ -8,7 +8,7 @@ use 5.014;
use parent 'Class::Accessor';
-our $VERSION = '6.19';
+our $VERSION = '6.20';
Travel::Status::DE::HAFAS::Stop->mk_ro_accessors(
qw(loc
@@ -41,8 +41,10 @@ sub new {
# dIn. / aOut. -> may passengers enter / exit the train?
- my $sched_platform = $stop->{aPlatfS} // $stop->{dPlatfS};
- my $rt_platform = $stop->{aPlatfR} // $stop->{dPlatfR};
+ my $sched_platform = $stop->{aPlatfS} // $stop->{dPlatfS}
+ // $stop->{aPltfS}{txt} // $stop->{dPltfS}{txt};
+ my $rt_platform = $stop->{aPlatfR} // $stop->{dPlatfR}
+ // $stop->{aPltfR}{txt} // $stop->{dPltfR}{txt};
my $changed_platform = $stop->{aPlatfCh} // $stop->{dPlatfCh};
my $arr_cancelled = $stop->{aCncl};
@@ -227,7 +229,7 @@ Travel::Status::DE::HAFAS::Stop - Information about a HAFAS stop.
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
index 802b78f..4085779 100644
--- a/lib/Travel/Status/DE/HAFAS/StopFinder.pm
+++ b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
@@ -10,7 +10,7 @@ use Encode qw(decode);
use JSON;
use LWP::UserAgent;
-our $VERSION = '6.19';
+our $VERSION = '6.20';
# {{{ Constructors
@@ -180,7 +180,7 @@ finder services
=head1 VERSION
-version 6.19
+version 6.20
=head1 DESCRIPTION