diff --git a/Changelog b/Changelog index e0aa33576bf372fa9f78bff96ded8790a85bb7cc..99b5416d9a696af7c6e5616a9aae4245820934fa 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 357cc70b5388ebc362a4edc7f5e8d9e430a80446..4c0778f9962f4eb9d1083d0fa623862d2841e445 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 cb018ae2111e218b6f356026653f860a0953aafb..38cdd02aaf5ba0e55d0b911e9b3c01d72a188d6d 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 751fc1b167c8b2a2239a5c8016daa5df5823818c..f1acc0d9ee6f9249f20654265a9a844c631d2e01 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 25c275d389f20fd911962f20731504c736fe6326..1c1539c05aabba006f71b1900aea6c2eb715ac5b 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 c94e39b119a9d1749770e562507b37b5fa2888b2..96279eee3069f702c4151b992a563677f7d3162a 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 4bc0e7ed4307977a828a1063971ec91be09748ba..4e98c03accb1283a7761ef28810ab4d2c90999c6 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 4c770160687481c91600c4b0266f03bbc4b894fc..005d2ee30e76a35b791b419685bc9ba1b4d2cce8 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 4316addca1d9cc19eea8bd1d3bc212482b79fd4b..14d5e7b3f37d0b3953d6019a49cbabce0411c8c0 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 29dcb4298b0cc900301453c05d242ba18afdbebe..3899d6f610758f6bf5eae0bbdaceff96770aba19 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 ec6b1a6abbac17a18227f2ef8a1a36df092da548..23e710a30400eb580a46e7f227b2518b02f05791 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 ce1109a523cb501843a11cceeb5db800d43883cc..2f6e87170412eae91001607afdd051c2adecd2e4 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