diff options
| -rw-r--r-- | lib/Server.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Server.hs b/lib/Server.hs index 7ebaca5..eff1807 100644 --- a/lib/Server.hs +++ b/lib/Server.hs @@ -109,7 +109,8 @@ server gtfs@GTFS{..} Metrics{..} subscribers dbpool settings = handleDebugAPI [ "trip" .= tripTripID , "sequencelength" .= (stopSequence . V.last) tripStops , "stops" .= fmap (\Stop{..} -> A.object - [ "departure" .= stopDeparture + [ "departure" .= toUTC stopDeparture tzseries day + , "arrival" .= toUTC stopArrival tzseries day , "station" .= stationId stopStation , "lat" .= stationLat stopStation , "lon" .= stationLon stopStation |