aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorstuebinm2022-12-03 11:23:08 +0100
committerstuebinm2022-12-03 11:23:08 +0100
commite7ac7404fff8d7e4fec5c91862bbeedc848bcc20 (patch)
treeacfc5fbdead3650d7e7968b0bc63e1242d69687f
parent4ae817811d413d0dba49d4288e96fce7f0aecbb8 (diff)
another gtfs rt thingie?
Diffstat (limited to '')
-rw-r--r--lib/Server/GTFS_RT.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Server/GTFS_RT.hs b/lib/Server/GTFS_RT.hs
index da3a3d0..d516cd2 100644
--- a/lib/Server/GTFS_RT.hs
+++ b/lib/Server/GTFS_RT.hs
@@ -171,7 +171,8 @@ gtfsRealtimeServer gtfs@GTFS{..} dbpool = handleServiceAlerts :<|> handleTripUpd
, STU.stop_id = Nothing
, STU.arrival = Just (
defaultValue { STE.delay = Just $ fromIntegral $ unSeconds $ trainAnchorDelay })
- , STU.departure = Nothing
+ , STU.departure = Just (
+ defaultValue { STE.delay = Just $ fromIntegral $ unSeconds $ trainAnchorDelay })
, STU.departure_occupancy_status = Nothing
, STU.schedule_relationship = Just SR.SCHEDULED
, STU.stop_time_properties = Nothing