Fix unnecessary newline when learning
This commit is contained in:
parent
ac4228ac09
commit
8fc9740337
1 changed files with 1 additions and 1 deletions
|
|
@ -123,7 +123,7 @@ showSide side = do
|
|||
promptContinue "--> Continue"
|
||||
|
||||
displaySide :: String -> InputT IO ()
|
||||
displaySide side = lift (putStrLn side)
|
||||
displaySide side = outputStr side
|
||||
|
||||
{-
|
||||
- Display stats
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue