From ce14bc010a8f97cd3bab6f5cbd998f614b811546 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Sun, 14 Aug 2022 15:44:19 +0200
Subject: controlroom: replace servant/lucid with yesod

aka use something meant for webapps to write the webapp
---
 lib/API.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/API.hs')

diff --git a/lib/API.hs b/lib/API.hs
index 9ed2846..9400187 100644
--- a/lib/API.hs
+++ b/lib/API.hs
@@ -19,7 +19,7 @@ import           Servant                     (Application, FormUrlEncoded,
                                               Server, err401, err404, type (:>))
 import           Servant.API                 (Capture, Get, JSON, NoContent,
                                               PlainText, Post, QueryParam,
-                                              ReqBody, type (:<|>) ((:<|>)))
+                                              ReqBody, type (:<|>) ((:<|>)), Raw)
 import           Servant.API.WebSocket       (WebSocket)
 import           Servant.GTFS.Realtime       (Proto)
 import           Servant.Swagger             (HasSwagger (..))
@@ -69,7 +69,7 @@ type AdminAPI =
 -- documented, which would be silly and way to verbose.
 type CompleteAPI = "debug" :> "openapi" :> Get '[JSON] Swagger
   :<|> API
-  :<|> "cr" :> ControlRoomAPI
+  :<|> "cr" :> Raw
 
 
 -- TODO write something useful here! (and if it's just "hey this is some websocket thingie")
-- 
cgit v1.2.3