use 'spawn' rather than runProcess, to report errors asynchronously, avoiding zombies

darcs-hash:20071119023712-cba2c-c034ed99f668ede81e7e1e247ff631ae9eda31f6

1 files changed, 1 insertions, 3 deletions

diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index 84b1311..d55b2e2 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -325,9 +325,7 @@ recompile = do
                         ["Error detected while loading xmonad configuration file: " ++ src]
                         ++ lines ghcErr ++ ["","Please check the file for errors."]
 
-                waitForProcess =<< runProcess "xmessage" [msg]
-                    Nothing Nothing Nothing Nothing Nothing
-                return ()
+                spawn $ "xmessage '" ++ msg ++ "'"
 
 -- | Run a side effecting action with the current workspace. Like 'when' but
 whenJust :: Monad m => Maybe a -> (a -> m ()) -> m ()