$OpenBSD: patch-XMonad_Core_hs,v 1.2 2011/04/04 22:40:55 kili Exp $

From Tomas Janousek.

--- XMonad/Core.hs.orig	Fri Dec 24 01:42:54 2010
+++ XMonad/Core.hs	Mon Apr  4 10:45:53 2011
@@ -465,7 +465,11 @@ trace = io . hPutStrLn stderr
 installSignalHandlers :: MonadIO m => m ()
 installSignalHandlers = io $ do
     installHandler openEndedPipe Ignore Nothing
-    installHandler sigCHLD Ignore Nothing
+    installHandler sigCHLD (Catch cleanZombies) Nothing
+    cleanZombies
+
+cleanZombies :: IO ()
+cleanZombies = do
     (try :: IO a -> IO (Either SomeException a))
       $ fix $ \more -> do
         x <- getAnyProcessStatus False False
