summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2024-09-28 14:24:40 +0200
committerBirte Kristina Friesel <derf@finalrewind.org>2024-09-28 14:24:40 +0200
commit7805ad6ca59eb2361098dbc24d734c33dbca5283 (patch)
treebe563418fb91f447dae44e2ff390282535318c00
parent713715b068143715d02822affd31941592ee9d1e (diff)
Release v6.10HEAD6.10main
-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/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.pm4
-rw-r--r--lib/Travel/Status/DE/HAFAS/StopFinder.pm4
12 files changed, 25 insertions, 20 deletions
diff --git a/Changelog b/Changelog
index e0aa335..99b5416 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,8 @@
+Travel::Status::DE::DeutscheBahn 6.10 - Sat Sep 28 2024
+
+ * HAFAS: Hardcode request seconds to 00 to improve caching
+ * hafas-m: Cache backend replies by default (if Cache::File is available)
+
Travel::Status::DE::DeutscheBahn 6.09 - Mon Aug 19 2024
* Improve handling of services which do not provide intermediate stops
diff --git a/bin/hafas-m b/bin/hafas-m
index 357cc70..4c0778f 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -3,7 +3,7 @@ use strict;
use warnings;
use 5.014;
-our $VERSION = '6.09';
+our $VERSION = '6.10';
use utf8;
use DateTime;
@@ -716,7 +716,7 @@ B<hafas-m> [B<-s> I<service>] [B<-l> I<language>] B<!>I<query>|I<journeyID>
=head1 VERSION
-version 6.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm
index cb018ae..38cdd02 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 = '6.09';
+our $VERSION = '6.10';
sub new {
my ( $class, %opt ) = @_;
@@ -49,7 +49,7 @@ monitor operated by Deutsche Bahn
=head1 VERSION
-version 6.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm
index 751fc1b..f1acc0d 100644
--- a/lib/Travel/Status/DE/HAFAS.pm
+++ b/lib/Travel/Status/DE/HAFAS.pm
@@ -22,7 +22,7 @@ use Travel::Status::DE::HAFAS::Product;
use Travel::Status::DE::HAFAS::Services;
use Travel::Status::DE::HAFAS::StopFinder;
-our $VERSION = '6.09';
+our $VERSION = '6.10';
# {{{ Endpoint Definition
@@ -891,7 +891,7 @@ monitors
=head1 VERSION
-version 6.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index 25c275d..1c1539c 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.09';
+our $VERSION = '6.10';
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.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Location.pm b/lib/Travel/Status/DE/HAFAS/Location.pm
index c94e39b..96279ee 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.09';
+our $VERSION = '6.10';
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.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm
index 4bc0e7e..4e98c03 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.09';
+our $VERSION = '6.10';
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.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm
index 4c77016..005d2ee 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.09';
+our $VERSION = '6.10';
# 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 4316add..14d5e7b 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.09';
+our $VERSION = '6.10';
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.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/Services.pm.PL b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
index 29dcb42..3899d6f 100644
--- a/lib/Travel/Status/DE/HAFAS/Services.pm.PL
+++ b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
@@ -230,7 +230,7 @@ use warnings;
use 5.014;
use utf8;
-our $VERSION = '6.09';
+our $VERSION = '6.10';
# 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 ec6b1a6..23e710a 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.09';
+our $VERSION = '6.10';
Travel::Status::DE::HAFAS::Stop->mk_ro_accessors(
qw(loc
@@ -227,7 +227,7 @@ Travel::Status::DE::HAFAS::Stop - Information about a HAFAS stop.
=head1 VERSION
-version 6.09
+version 6.10
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/HAFAS/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
index ce1109a..2f6e871 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.09';
+our $VERSION = '6.10';
# {{{ Constructors
@@ -180,7 +180,7 @@ finder services
=head1 VERSION
-version 6.09
+version 6.10
=head1 DESCRIPTION