diff options
Diffstat (limited to 'lib/Travel')
-rw-r--r-- | lib/Travel/Status/DE/DBRIS/Location.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/DBRIS/Location.pm b/lib/Travel/Status/DE/DBRIS/Location.pm index b44989e..9c01bf3 100644 --- a/lib/Travel/Status/DE/DBRIS/Location.pm +++ b/lib/Travel/Status/DE/DBRIS/Location.pm @@ -116,6 +116,12 @@ sub TO_JSON { my $ret = { %{$self} }; + for my $k (qw(sched_dep rt_dep dep sched_arr rt_arr arr)) { + if ( $ret->{$k} ) { + $ret->{$k} = $ret->{$k}->epoch; + } + } + return $ret; } |