$OpenBSD: patch-XMonad_Core_hs,v 1.3 2012/01/12 11:11:58 dcoppa Exp $

From Tomas Janousek.

--- XMonad/Core.hs.orig	Sat Nov 19 00:14:36 2011
+++ XMonad/Core.hs	Wed Jan 11 10:04:38 2012
@@ -502,7 +502,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
