aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--server/lib/Uplcg/Main/Server.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/server/lib/Uplcg/Main/Server.hs b/server/lib/Uplcg/Main/Server.hs
index 1672d84..295b736 100644
--- a/server/lib/Uplcg/Main/Server.hs
+++ b/server/lib/Uplcg/Main/Server.hs
@@ -167,7 +167,6 @@ scottyApp server = Scotty.scottyApp $ do
case roomPassword room of
RoomPassword actual -> do
mbGiven <- getPassword
- liftIO $ print mbGiven
case mbGiven of
Just given | given == actual ->
Scotty.html . renderHtml $ Views.client ridt $ Just actual