diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-08-12 18:17:05 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-08-12 18:17:05 +0200 |
commit | 521ed1eb87b6dbfeb18086cfa68019e49f9d5721 (patch) | |
tree | e7c087203819bd5355271c38e13e21f6bd30179b /lib | |
parent | 97b0b4bd938cba7fa32a8afd8bf343d019b1a72d (diff) |
DBDB: handle undef train_types
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Travelynx/Helper/DBDB.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Travelynx/Helper/DBDB.pm b/lib/Travelynx/Helper/DBDB.pm index 82cdc72..10b9136 100644 --- a/lib/Travelynx/Helper/DBDB.pm +++ b/lib/Travelynx/Helper/DBDB.pm @@ -29,6 +29,7 @@ sub new { sub has_wagonorder_p { my ( $self, %opt ) = @_; + $opt{train_type} //= q{}; my $datetime = $opt{datetime}->clone->set_time_zone('UTC'); my %param = ( administrationId => 80, |