aboutsummaryrefslogtreecommitdiff
path: root/server/lib/Uplcg
diff options
context:
space:
mode:
authorJasper Van der Jeugt2020-08-18 14:41:31 +0200
committerJasper Van der Jeugt2020-08-18 14:41:31 +0200
commitb6036ebb0becf102f4cf5fe0483aa88a39e784e1 (patch)
tree72f72b57b8b4e8fb9543121b66d9e979ec0029b1 /server/lib/Uplcg
parent50abccd8a4243c561cc39c54f84ddfaae8c73120 (diff)
Refactor: remove print
Diffstat (limited to 'server/lib/Uplcg')
-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