From 7ddf106694c6174200d84e75055b4e13f5719e02 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <spencerjanssen@gmail.com>
Date: Fri, 16 Jan 2009 22:03:15 +0100
Subject: Update all uses of doubleFork/waitForProcess

Ignore-this: 4e15b7f3fd6af3b7317449608f5246b0

darcs-hash:20090116210315-25a6b-53190793833624e0c5e36ce353333092e5243883.gz
---
 XMonad/Prompt/Man.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'XMonad/Prompt')

diff --git a/XMonad/Prompt/Man.hs b/XMonad/Prompt/Man.hs
index 20e282d..a9c8d0e 100644
--- a/XMonad/Prompt/Man.hs
+++ b/XMonad/Prompt/Man.hs
@@ -88,12 +88,12 @@ manCompl mans s | s == "" || last s == ' ' = return []
 -- better\/more idiomatic.)
 getCommandOutput :: String -> IO String
 getCommandOutput s = do
-  (pin, pout, perr, ph) <- runInteractiveCommand s
+  -- we can ignore the process handle because we ignor SIGCHLD
+  (pin, pout, perr, _) <- runInteractiveCommand s
   hClose pin
   output <- hGetContents pout
   E.evaluate (length output)
   hClose perr
-  waitForProcess ph
   return output
 
 stripExt :: String -> String
-- 
cgit v1.2.3