diff options
author | stuebinm | 2022-12-03 11:06:31 +0100 |
---|---|---|
committer | stuebinm | 2022-12-03 11:06:31 +0100 |
commit | 4ae817811d413d0dba49d4288e96fce7f0aecbb8 (patch) | |
tree | 4d73fbdf7aed2f7279215b5bae2e52fb19b5f3d1 | |
parent | fb960c660357f9cd4dca57be1325e4ecbb50f649 (diff) |
fix google warning
-rw-r--r-- | lib/Server/GTFS_RT.hs | 2 |
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 |