Don't rely on INSIDE_EMACS

It is getting set by M-x term and shell as well, so it's wrong to
decide whether to run in the embedded mode based on it.

1 files changed, 1 insertions, 2 deletions

diff --git a/Pancake.hs b/Pancake.hs
index 9647186..1573d12 100644
--- a/Pancake.hs
+++ b/Pancake.hs
@@ -770,7 +770,6 @@ eventLoop = do
 main :: IO ()
 main = do
   args <- getArgs
-  insideEmacs <- lookupEnv "INSIDE_EMACS"
   _ <- runStateT (loadConfig >> eventLoop) $
-    LS ([],[]) 0 [] def (isJust insideEmacs || "--embedded" `elem` args)
+    LS ([],[]) 0 [] def ("--embedded" `elem` args)
   pure ()