aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorstuebinm2022-12-03 11:06:31 +0100
committerstuebinm2022-12-03 11:06:31 +0100
commit4ae817811d413d0dba49d4288e96fce7f0aecbb8 (patch)
tree4d73fbdf7aed2f7279215b5bae2e52fb19b5f3d1
parentfb960c660357f9cd4dca57be1325e4ecbb50f649 (diff)
fix google warning
-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