Loading lib/Travelynx/Helper/DBDB.pm +1 −0 Original line number Diff line number Diff line Loading @@ -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, Loading Loading
lib/Travelynx/Helper/DBDB.pm +1 −0 Original line number Diff line number Diff line Loading @@ -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, Loading