diff options
| author | stuebinm | 2022-10-16 13:34:25 +0200 |
|---|---|---|
| committer | stuebinm | 2022-10-16 13:34:25 +0200 |
| commit | 48c42f93b040e0a27037c1a6728dd9dc2bd4f573 (patch) | |
| tree | 215d5dae2ff3e2476106939b0399d6dd38c8e218 | |
| parent | 6b23818477ef011cdc0b1a5fb13555160a85eaee (diff) | |
gtfs-rt: don't remove SCHEDULED from schedule_relationship
(since it's the default value it's not serialised; but best practices
say to have it there explicitly)
| -rw-r--r-- | gtfs/GTFS/Realtime/TripUpdate/StopTimeUpdate.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gtfs/GTFS/Realtime/TripUpdate/StopTimeUpdate.hs b/gtfs/GTFS/Realtime/TripUpdate/StopTimeUpdate.hs index e2553e3..25ae353 100644 --- a/gtfs/GTFS/Realtime/TripUpdate/StopTimeUpdate.hs +++ b/gtfs/GTFS/Realtime/TripUpdate/StopTimeUpdate.hs @@ -44,7 +44,7 @@ instance P'.Mergeable StopTimeUpdate where instance P'.Default StopTimeUpdate where defaultValue = StopTimeUpdate P'.defaultValue P'.defaultValue P'.defaultValue P'.defaultValue P'.defaultValue - (Prelude'.Just (Prelude'.read "SCHEDULED")) + P'.defaultValue P'.defaultValue P'.defaultValue @@ -146,4 +146,4 @@ instance P'.TextMsg StopTimeUpdate where = Prelude'.fmap (\ v o -> o{departure_occupancy_status = v}) (P'.try (P'.getT "departure_occupancy_status")) parse'schedule_relationship = Prelude'.fmap (\ v o -> o{schedule_relationship = v}) (P'.try (P'.getT "schedule_relationship")) - parse'stop_time_properties = Prelude'.fmap (\ v o -> o{stop_time_properties = v}) (P'.try (P'.getT "stop_time_properties"))
\ No newline at end of file + parse'stop_time_properties = Prelude'.fmap (\ v o -> o{stop_time_properties = v}) (P'.try (P'.getT "stop_time_properties")) |