summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Changelog5
-rwxr-xr-xbin/hafas-m4
-rw-r--r--lib/Travel/Status/DE/DeutscheBahn.pm4
-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/Message.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/Polyline.pm2
-rw-r--r--lib/Travel/Status/DE/HAFAS/Stop.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/StopFinder.pm4
9 files changed, 20 insertions, 15 deletions
diff --git a/Changelog b/Changelog
index 4f04a4a..fc6868e 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,8 @@
+Travel::Status::DE::DeutscheBahn 4.12 - Mon May 29 2023
+
+ * Fix Journey->route and HAFAS geoSearch / locationSearch returning
+ incorrect geocoordinates (latitude and longitude were mixed up)
+
Travel::Status::DE::DeutscheBahn 4.11 - Thu May 25 2023
* hafas-m: Add --json option
diff --git a/bin/hafas-m b/bin/hafas-m
index c6027d5..d4271e9 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -3,7 +3,7 @@ use strict;
use warnings;
use 5.014;
-our $VERSION = '4.11';
+our $VERSION = '4.12';
use utf8;
use DateTime;
@@ -373,7 +373,7 @@ B<hafas-m> [B<-d> I<date>] [B<-t> I<time>] [B<-m> I<motlist>]
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm
index 2ad17e8..cb4763d 100644
--- a/lib/Travel/Status/DE/DeutscheBahn.pm
+++ b/lib/Travel/Status/DE/DeutscheBahn.pm
@@ -6,7 +6,7 @@ use 5.014;
use parent 'Travel::Status::DE::HAFAS';
-our $VERSION = '4.11';
+our $VERSION = '4.12';
sub new {
my ( $class, %opt ) = @_;
@@ -49,7 +49,7 @@ monitor operated by Deutsche Bahn
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm
index ff455d7..6a5553d 100644
--- a/lib/Travel/Status/DE/HAFAS.pm
+++ b/lib/Travel/Status/DE/HAFAS.pm
@@ -22,7 +22,7 @@ use Travel::Status::DE::HAFAS::Journey;
use Travel::Status::DE::HAFAS::StopFinder;
use Travel::Status::DE::HAFAS::Stop;
-our $VERSION = '4.11';
+our $VERSION = '4.12';
# {{{ Endpoint Definition
@@ -903,7 +903,7 @@ monitors
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index d06a65b..c0dbcd1 100644
--- a/lib/Travel/Status/DE/HAFAS/Journey.pm
+++ b/lib/Travel/Status/DE/HAFAS/Journey.pm
@@ -12,7 +12,7 @@ use parent 'Class::Accessor';
use List::Util qw(any);
use Travel::Status::DE::HAFAS::Stop;
-our $VERSION = '4.11';
+our $VERSION = '4.12';
Travel::Status::DE::HAFAS::Journey->mk_ro_accessors(
qw(datetime sched_datetime rt_datetime
@@ -461,7 +461,7 @@ journey received by Travel::Status::DE::HAFAS
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm
index 1a49ba0..5b8d6dd 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 = '4.11';
+our $VERSION = '4.12';
Travel::Status::DE::HAFAS::Message->mk_ro_accessors(
qw(short text code prio is_him ref_count));
@@ -45,7 +45,7 @@ Travel::Status::DE::HAFAS::Message - An arrival/departure-related message.
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm
index fc55574..0535727 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 = '4.11';
+our $VERSION = '4.12';
# 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/Stop.pm b/lib/Travel/Status/DE/HAFAS/Stop.pm
index 9948e77..e30849e 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 = '4.11';
+our $VERSION = '4.12';
Travel::Status::DE::HAFAS::Stop->mk_ro_accessors(
qw(eva name lat lon distance_m weight));
@@ -76,7 +76,7 @@ Travel::Status::DE::HAFAS::Stop - Information about a HAFAS stop.
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
index 3b24207..b7913ec 100644
--- a/lib/Travel/Status/DE/HAFAS/StopFinder.pm
+++ b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
@@ -12,7 +12,7 @@ use Encode qw(decode);
use JSON;
use LWP::UserAgent;
-our $VERSION = '4.11';
+our $VERSION = '4.12';
# {{{ Constructors
@@ -182,7 +182,7 @@ finder services
=head1 VERSION
-version 4.11
+version 4.12
=head1 DESCRIPTION