diff options
| author | stuebinm | 2022-07-11 23:33:01 +0200 |
|---|---|---|
| committer | stuebinm | 2022-07-11 23:33:01 +0200 |
| commit | 498ae348d120f156c65a89c87d9852393b23e2f4 (patch) | |
| tree | a6882a4f3e0759be0521407290d34bb83ebb23e4 /lib/Server.hs | |
| parent | 25a672a436eec65f2de097a1187ba8a3b8b6165a (diff) | |
somewhat functioning control room
tbh i've kinda lost track at what has all been changed in this, but the
control room form handling now works, and i can write announcements into
the database. Now on to making it do useful things!
Diffstat (limited to 'lib/Server.hs')
| -rw-r--r-- | lib/Server.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Server.hs b/lib/Server.hs index 544b6ae..cc86cd2 100644 --- a/lib/Server.hs +++ b/lib/Server.hs @@ -65,7 +65,7 @@ server gtfs@GTFS{..} dbpool = handleDebugAPI :<|> (handleStations :<|> handleTim :<|> handleRegister :<|> handleTripPing :<|> handleWS :<|> handleDebugState :<|> gtfsRealtimeServer gtfs dbpool :<|> adminServer gtfs dbpool) - :<|> controlRoomServer + :<|> controlRoomServer gtfs dbpool where handleStations = pure stations handleTimetable station maybeDay = do -- TODO: resolve "overlay" trips (perhaps just additional CalendarDates?) |