From 8fc9740337302c52f16a71a051a2a14ddf67db45 Mon Sep 17 00:00:00 2001
From: Joscha <brummer@migejolise.de>
Date: Sat, 6 Jan 2018 11:15:44 +0000
Subject: [PATCH] Fix unnecessary newline when learning

---
 app/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/app/Main.hs b/app/Main.hs
index 43dbedd..facfcaa 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -123,7 +123,7 @@ showSide side = do
   promptContinue "--> Continue"
 
 displaySide :: String -> InputT IO ()
-displaySide side = lift (putStrLn side)
+displaySide side = outputStr side
 
 {-
  - Display stats