From 5854d4045a2c8d1cfee2c07037ac14a5d5d727cf Mon Sep 17 00:00:00 2001
From: Marc Scholten <marc@digitallyinduced.com>
Date: Fri, 23 Oct 2020 19:07:24 +0200
Subject: [PATCH] Fixed live reload not being triggered

---
 exe/IHP/IDE/DevServer.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/exe/IHP/IDE/DevServer.hs b/exe/IHP/IDE/DevServer.hs
index 298772c94..46ac5d54e 100644
--- a/exe/IHP/IDE/DevServer.hs
+++ b/exe/IHP/IDE/DevServer.hs
@@ -233,6 +233,7 @@ startAppGHCI = do
 
     let loadAppCommands = 
             [ ":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"
             ]