more or less functional servicealerts for gtfs rt

(kinda barebones, but the important things should be there)

1 files changed, 7 insertions, 2 deletions

diff --git a/lib/Persist.hs b/lib/Persist.hs
index 4a6d9b4..552074f 100644
--- a/lib/Persist.hs
+++ b/lib/Persist.hs
@@ -78,10 +78,15 @@ TripPing json sql=tt_trip_ping
   timestamp UTCTime
   deriving Show Generic Eq
 
-Announcements sql=tt_announcements
+-- TODO: multi-language support?
+Announcement sql=tt_announcements
+  Id UUID default=uuid_generate_v4()
   trip TripID
   message Text
-  day Text
+  header Text
+  day Day
+  url Text Maybe
+  announcedAt UTCTime Maybe
 
 -- | this table works as calendar_dates.txt in GTFS
 ScheduleAmendment json sql=tt_schedule_amendement