diff options
Diffstat (limited to 'lib/Persist.hs')
| -rw-r--r-- | lib/Persist.hs | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/lib/Persist.hs b/lib/Persist.hs index 39cdca1..e463195 100644 --- a/lib/Persist.hs +++ b/lib/Persist.hs @@ -88,17 +88,11 @@ TrainPing json sql=tt_trip_ping -- status of a train somewhen in time (may be in the future), -- inferred from trainpings / entered via controlRoom -TrainStatus sql=tt_train_status - timestamp UTCTime +TrainAnchor json sql=tt_trip_anchor trip TripID day Day + created UTCTime when UTCTime - deriving Show Generic Eq ToSchema - -TripAnchor json sql=tt_trip_anchor - trip TripID - day Day - timestamp UTCTime delay Int Maybe msg Text Maybe deriving Show Generic Eq ToSchema |