putStr doesn't put anything comparing to putStrLn

graninas / Hydra

Hydra is a full-fledged framework for building web services, multithreaded and concurrent applications with SQL and KV DB support.

BSD 3-Clause "New" or "Revised" License

189 stars 13 forks source link

Open graninas opened 4 years ago

graninas commented 4 years ago

getUserInput :: AppL Text
getUserInput = do
  evalIO $ putStrLn ">>"
  evalIO $ putStr "> "
  evalIO getLine

>>