diff options
Diffstat (limited to 'src/server/Main.hs')
| -rw-r--r-- | src/server/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/server/Main.hs b/src/server/Main.hs index 14e69fa..0828e0d 100644 --- a/src/server/Main.hs +++ b/src/server/Main.hs @@ -5,6 +5,7 @@ import Web.Scotty import Network.Wai.Middleware.Static import Data.Text (Text) +import qualified Data.Text.IO as TIO import Controller.Index import Controller.SignIn @@ -19,7 +20,7 @@ main = do eitherConfig <- getConfig "config.txt" case eitherConfig of Left errorMessage -> - putStrLn errorMessage + TIO.putStrLn errorMessage Right config -> do runMigrations scotty (port config) $ do |