Loading lib/Travel/Status/DE/DBRIS/Location.pm +6 −0 Original line number Diff line number Diff line Loading @@ -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; } Loading Loading
lib/Travel/Status/DE/DBRIS/Location.pm +6 −0 Original line number Diff line number Diff line Loading @@ -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; } Loading