diff --git a/exe/IHP/IDE/DevServer.hs b/exe/IHP/IDE/DevServer.hs index 2f75ad0ad..47f283bb9 100644 --- a/exe/IHP/IDE/DevServer.hs +++ b/exe/IHP/IDE/DevServer.hs @@ -288,7 +288,6 @@ startAppGHCI = do [ ":script " <> cs libDirectory <> "/applicationGhciConfig" , ":set prompt \"\"" -- Disable the prompt as this caused output such as '[38;5;208mIHP>[m Ser[v3e8r; 5s;t2a0r8tmedI' instead of 'Server started' , "import qualified ClassyPrelude" - , ":l Main.hs" ] async $ forever $ ByteString.hGetLine outputHandle >>= \line -> do diff --git a/lib/IHP/applicationGhciConfig b/lib/IHP/applicationGhciConfig index 31d10f3c3..585e974cc 100755 --- a/lib/IHP/applicationGhciConfig +++ b/lib/IHP/applicationGhciConfig @@ -48,4 +48,6 @@ :set -XDeepSubsumption :set -XOverloadedRecordDot :set -Werror=missing-fields -:set -fwarn-incomplete-patterns \ No newline at end of file +:set -fwarn-incomplete-patterns +:set -package ghc +:l Main.hs \ No newline at end of file