aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Server/GTFS_RT.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Server/GTFS_RT.hs b/lib/Server/GTFS_RT.hs
index a697295..da3a3d0 100644
--- a/lib/Server/GTFS_RT.hs
+++ b/lib/Server/GTFS_RT.hs
@@ -178,7 +178,7 @@ gtfsRealtimeServer gtfs@GTFS{..} dbpool = handleServiceAlerts :<|> handleTripUpd
, STU.ext'field = defaultValue
})
$ catMaybes $ V.toList stations
- , TU.delay = lastCall <&> (fromIntegral . unSeconds . trainAnchorDelay)
+ , TU.delay = Nothing -- lastCall <&> (fromIntegral . unSeconds . trainAnchorDelay)
, TU.timestamp = lastCall <&> (toStupidTime . trainAnchorCreated)
, TU.trip_properties = Nothing
, TU.ext'field = defaultValue