From 7caeab689baf8390e12915264838c1a0da73e2ef Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Thu, 26 Dec 2024 14:00:54 +0100 Subject: journey: parse trip day and attributes --- lib/Travel/Status/DE/DBRIS.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'lib/Travel/Status/DE/DBRIS.pm') diff --git a/lib/Travel/Status/DE/DBRIS.pm b/lib/Travel/Status/DE/DBRIS.pm index 66790b2..6221622 100644 --- a/lib/Travel/Status/DE/DBRIS.pm +++ b/lib/Travel/Status/DE/DBRIS.pm @@ -95,6 +95,11 @@ sub new { time_zone => 'Europe/Berlin', ); + $self->{strpdate_obj} //= DateTime::Format::Strptime->new( + pattern => '%Y-%m-%d', + time_zone => 'Europe/Berlin', + ); + my $json = $self->{json} = JSON->new->utf8; if ( $conf{async} ) { @@ -272,7 +277,8 @@ sub parse_journey { $self->{result} = Travel::Status::DE::DBRIS::Journey->new( json => $self->{raw_json}, - strptime_obj => $self->{strptime_obj} + strpdate_obj => $self->{strpdate_obj}, + strptime_obj => $self->{strptime_obj}, ); } -- cgit v1.2.3