From 85af20955c828eb7bfb435d8afa3770d9198e955 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 15 Dec 2013 22:13:27 +0100 Subject: add -s, -S options to allow user control of time/duration formats --- lib/Travel/Status/DE/ASEAG.pm | 2 +- lib/Travel/Status/DE/ASEAG/Result.pm | 6 ++++-- 2 files changed, 5 insertions(+), 3 deletions(-) (limited to 'lib/Travel/Status') diff --git a/lib/Travel/Status/DE/ASEAG.pm b/lib/Travel/Status/DE/ASEAG.pm index ed17d98..4be2cd2 100644 --- a/lib/Travel/Status/DE/ASEAG.pm +++ b/lib/Travel/Status/DE/ASEAG.pm @@ -188,7 +188,7 @@ sub results { DateTime->from_epoch( epoch => $_->[0], time_zone => 'Europe/Berlin' - )->hms, + ), decode( 'UTF-8', $_->[1] ) ] } @route; diff --git a/lib/Travel/Status/DE/ASEAG/Result.pm b/lib/Travel/Status/DE/ASEAG/Result.pm index 6e09692..3d88261 100644 --- a/lib/Travel/Status/DE/ASEAG/Result.pm +++ b/lib/Travel/Status/DE/ASEAG/Result.pm @@ -94,8 +94,10 @@ The number of the line. =item $departure->route_timetable -Returns an arrayref of arrayrefs describing the entire route as departure, -stop objects. +Returns an arrayref of arrayrefs describing the entire route. I.e. +C<< [[$time1, $stop1], [$time2, $stop2], ...] >>. +The times are DateTime::Duration(3pm) objects, the stops are only names, +not IDs (subject to change). =item $departure->stop -- cgit v1.2.3