diff --git a/Changelog b/Changelog index 599f700e1f1b1f92a39c451ee4169024d9f81732..dc5872feb2aafc56a50b9d5fdc800272f867e42d 100644 --- a/Changelog +++ b/Changelog @@ -1,4 +1,4 @@ -git HEAD +Travel::Status::DE::DeutscheBahn 4.03 - Sat Jan 28 2023 * HAFAS: Add "station" accessor * Journey: Add "station", "station_uic" and "line_no" accessors diff --git a/bin/hafas-m b/bin/hafas-m index 0d8ff29e462289ec63b6237100c7243a55e3d9d7..7e2c670d827d228088fcbb3f6df87ea8bb25f1b3 100755 --- a/bin/hafas-m +++ b/bin/hafas-m @@ -3,7 +3,7 @@ use strict; use warnings; use 5.014; -our $VERSION = '4.02'; +our $VERSION = '4.03'; use utf8; use DateTime; @@ -333,7 +333,7 @@ B<hafas-m> [B<-d> I<date>] [B<-t> I<time>] [B<-m> I<motlist>] =head1 VERSION -version 4.02 +version 4.03 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm index b2a410f5d44c510e16343a96e431718d496a1170..983abfb80cd7e6ec82544740d3c8a9c5738d5b03 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.02'; +our $VERSION = '4.03'; sub new { my ( $class, %opt ) = @_; @@ -49,7 +49,7 @@ monitor operated by Deutsche Bahn =head1 VERSION -version 4.02 +version 4.03 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index 6e9f3e2e00ee2e2b01f39702fb9830cfb014afd6..d298100dd4b288707bfe57510623619903d5daed 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -21,7 +21,7 @@ use Travel::Status::DE::HAFAS::Polyline qw(decode_polyline); use Travel::Status::DE::HAFAS::Journey; use Travel::Status::DE::HAFAS::StopFinder; -our $VERSION = '4.02'; +our $VERSION = '4.03'; # {{{ Endpoint Definition @@ -775,7 +775,7 @@ monitors =head1 VERSION -version 4.02 +version 4.03 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index 06a71df91b130ff1991e476de53a059539958962..b48853b1ce7446c694b8e42b9b7e3af3dc733805 100644 --- a/lib/Travel/Status/DE/HAFAS/Journey.pm +++ b/lib/Travel/Status/DE/HAFAS/Journey.pm @@ -10,7 +10,7 @@ no if $] >= 5.018, warnings => 'experimental::smartmatch'; use parent 'Class::Accessor'; -our $VERSION = '4.02'; +our $VERSION = '4.03'; Travel::Status::DE::HAFAS::Journey->mk_ro_accessors( qw(datetime sched_datetime rt_datetime @@ -412,7 +412,7 @@ journey received by Travel::Status::DE::HAFAS =head1 VERSION -version 4.02 +version 4.03 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm index 236ef06f454e8bdb25dbb54fd6f4f71f0119e1be..61a4916f284f74f6c2a7b76f91d9d8847d588dca 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.02'; +our $VERSION = '4.03'; 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.02 +version 4.03 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm index d286730d7f69acb629c06384dd70278e66d98fb5..0e42e6953ee68c74c8ddae4a2f9770141836a557 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.02'; +our $VERSION = '4.03'; # 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/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm index 2d038b5c7f125a942ee0bcc6eafe84c278f57b35..40bb25669d42e2597b94e59b11a526fc066ce5be 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.02'; +our $VERSION = '4.03'; sub new { my ( $obj, %conf ) = @_; @@ -123,7 +123,7 @@ finder services =head1 VERSION -version 4.02 +version 4.03 =head1 DESCRIPTION