summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/URA.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Travel/Status/DE/URA.pm')
-rw-r--r--lib/Travel/Status/DE/URA.pm17
1 files changed, 9 insertions, 8 deletions
diff --git a/lib/Travel/Status/DE/URA.pm b/lib/Travel/Status/DE/URA.pm
index f86d05c..5eee5d8 100644
--- a/lib/Travel/Status/DE/URA.pm
+++ b/lib/Travel/Status/DE/URA.pm
@@ -15,6 +15,7 @@ use List::MoreUtils qw(firstval none uniq);
use LWP::UserAgent;
use Text::CSV;
use Travel::Status::DE::URA::Result;
+use Travel::Status::DE::URA::Stop;
sub new {
my ( $class, %opt ) = @_;
@@ -188,22 +189,22 @@ sub results {
map { [ $_, $_->[0] ] } @route_post;
@route_pre = map {
- [
- DateTime->from_epoch(
+ Travel::Status::DE::URA::Stop->new(
+ datetime => DateTime->from_epoch(
epoch => $_->[0],
time_zone => 'Europe/Berlin'
),
- decode( 'UTF-8', $_->[1] )
- ]
+ name => decode( 'UTF-8', $_->[1] )
+ )
} @route_pre;
@route_post = map {
- [
- DateTime->from_epoch(
+ Travel::Status::DE::URA::Stop->new(
+ datetime => DateTime->from_epoch(
epoch => $_->[0],
time_zone => 'Europe/Berlin'
),
- decode( 'UTF-8', $_->[1] )
- ]
+ name => decode( 'UTF-8', $_->[1] )
+ )
} @route_post;
}