new feature: Server.Frontend.Ticker

A simple way to have "announcements" available via API, and otherwise
distinct from the service announcements which show up in Gtfs Realtime.

These are meant to go e.g. be embedded on the operator's website, or in
other places where it's not as easy to display per-trip specific messages.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib/API.hs b/lib/API.hs
index 7ebfb06..416f71e 100644
--- a/lib/API.hs
+++ b/lib/API.hs
@@ -69,6 +69,7 @@ type API =
        "tracker" :> "register" :> ReqBody '[JSON] RegisterJson :> Post '[JSON] Token
   :<|> "tracker" :> "ping" :> ReqBody '[JSON] SentPing :> Post '[JSON] (Maybe TrainAnchor)
   :<|> "tracker" :> "ping" :> "ws" :> WebSocket
+  :<|> "ticker" :> "current" :> Get '[JSON] Value
   :<|> "ticket" :> "subscribe" :> Capture "Ticket Id" UUID :> WebSocket
   :<|> "debug" :> "pings" :> Get '[JSON] (Map Token [TrainPing])
   :<|> "debug" :> "pings" :> Capture "Ticket Id" UUID :> Get '[JSON] [TrainPing]