From e8e22fd6cd102cee2b3fb7e4aa800d15184f104f Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Thu, 14 Dec 2023 19:59:02 +0100 Subject: Release v5.02 --- Changelog | 9 +++++++++ README.md | 2 +- bin/hafas-m | 4 ++-- lib/Travel/Status/DE/DeutscheBahn.pm | 4 ++-- lib/Travel/Status/DE/HAFAS.pm | 4 ++-- lib/Travel/Status/DE/HAFAS/Journey.pm | 4 ++-- lib/Travel/Status/DE/HAFAS/Location.pm | 4 ++-- lib/Travel/Status/DE/HAFAS/Message.pm | 4 ++-- lib/Travel/Status/DE/HAFAS/Polyline.pm | 2 +- lib/Travel/Status/DE/HAFAS/Stop.pm | 4 ++-- lib/Travel/Status/DE/HAFAS/StopFinder.pm | 4 ++-- 11 files changed, 27 insertions(+), 18 deletions(-) diff --git a/Changelog b/Changelog index d687a23..baf69e1 100644 --- a/Changelog +++ b/Changelog @@ -1,3 +1,12 @@ +Travel::Status::DE::DeutscheBahn 5.02 - Wed Dec 14 2023 + + * Fix calls to $journey->route crashing in handle_day_change or add_message + in some circumstances if the $hafas object that created $journey has + gone out of scope (and become eligible for garbage collection) in the + meantime. The culprit was a mis-application of weaken() introduced in + v5.01. + * hafas-m: Add -v/--via option + Travel::Status::DE::DeutscheBahn 5.01 - Sat Nov 25 2023 * Fix incorrect handling of HIM messages (introduced in 4.19) diff --git a/README.md b/README.md index 2107edc..0174a56 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ # hafas-m - Commandline Public Transit Departure Monitor -hafas-m is a commandline client and Perl module for HAFAS public transit +**hafas-m** is a commandline client and Perl module for HAFAS public transit departure interfaces, with a focus on the one operated by Deutsche Bahn. See the [Travel::Status::DE::HAFAS homepage](https://finalrewind.org/projects/Travel-Status-DE-DeutscheBahn) and diff --git a/bin/hafas-m b/bin/hafas-m index 2bf2e5a..b24ed1f 100755 --- a/bin/hafas-m +++ b/bin/hafas-m @@ -3,7 +3,7 @@ use strict; use warnings; use 5.014; -our $VERSION = '5.01'; +our $VERSION = '5.02'; use utf8; use DateTime; @@ -552,7 +552,7 @@ B [B<-s> I] [B<-l> I] BI|I =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm index c03f154..4a4e912 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 = '5.01'; +our $VERSION = '5.02'; sub new { my ( $class, %opt ) = @_; @@ -49,7 +49,7 @@ monitor operated by Deutsche Bahn =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index cd0afa1..cac4da3 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -20,7 +20,7 @@ use Travel::Status::DE::HAFAS::Message; use Travel::Status::DE::HAFAS::Polyline qw(decode_polyline); use Travel::Status::DE::HAFAS::StopFinder; -our $VERSION = '5.01'; +our $VERSION = '5.02'; # {{{ Endpoint Definition @@ -964,7 +964,7 @@ monitors =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index 9e12211..f09a367 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); use Travel::Status::DE::HAFAS::Stop; -our $VERSION = '5.01'; +our $VERSION = '5.02'; Travel::Status::DE::HAFAS::Journey->mk_ro_accessors( qw(datetime sched_datetime rt_datetime @@ -400,7 +400,7 @@ journey received by Travel::Status::DE::HAFAS =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Location.pm b/lib/Travel/Status/DE/HAFAS/Location.pm index 27706a7..eab066e 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 = '5.01'; +our $VERSION = '5.02'; 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 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm index d3f4873..562a4ae 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 = '5.01'; +our $VERSION = '5.02'; 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 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm index 427f3db..6f3e921 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 = '5.01'; +our $VERSION = '5.02'; # Translated this php script # diff --git a/lib/Travel/Status/DE/HAFAS/Stop.pm b/lib/Travel/Status/DE/HAFAS/Stop.pm index b3bce08..c9559f0 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 = '5.01'; +our $VERSION = '5.02'; Travel::Status::DE::HAFAS::Stop->mk_ro_accessors( qw(loc @@ -183,7 +183,7 @@ Travel::Status::DE::HAFAS::Stop - Information about a HAFAS stop. =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm index 1c32c9d..8802973 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 = '5.01'; +our $VERSION = '5.02'; # {{{ Constructors @@ -180,7 +180,7 @@ finder services =head1 VERSION -version 5.01 +version 5.02 =head1 DESCRIPTION -- cgit v1.2.3