diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-08-10 18:17:37 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-08-10 18:17:37 +0200 |
commit | 4c9056d8aa1f4e5c804b116252a7ed189085435b (patch) | |
tree | e34a0d56d5ea1306d8a52b2ad1f1f01516106bdb /lib/Travel/Status/DE/HAFAS/Journey.pm | |
parent | 2c48152c47ceb5ad07126d10cea06acdbaa5c0ed (diff) |
Release v6.046.04
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS/Journey.pm')
-rw-r--r-- | lib/Travel/Status/DE/HAFAS/Journey.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index 07325e5..756e193 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.03'; +our $VERSION = '6.04'; Travel::Status::DE::HAFAS::Journey->mk_ro_accessors( qw(datetime sched_datetime rt_datetime tz_offset @@ -226,7 +226,7 @@ sub new { my $load = $tco_kv->{rRT} // $tco_kv->{r}; # BVG uses 11 .. 13 rather than 1 .. 4 - if ( $load > 10 ) { + if ( defined $load and $load > 10 ) { $load -= 10; } @@ -437,7 +437,7 @@ journey received by Travel::Status::DE::HAFAS =head1 VERSION -version 6.03 +version 6.04 =head1 DESCRIPTION |