twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-01 04:31:53 -07:00
Code Issues Packages Projects Releases Wiki Activity

setsid() before exec. Intended to fix issue #7

Browse Source
This commit is contained in:
Spencer Janssen
2007-05-14 04:45:47 +00:00
parent 54ee507cca
commit 67fe5ab219
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad.hs
View File

@@ -26,7 +26,7 @@ import StackSet (StackSet)
import Control.Monad.State
import Control.Monad.Reader
import System.IO
import System.Posix.Process (executeFile, forkProcess, getProcessStatus)
import System.Posix.Process (executeFile, forkProcess, getProcessStatus, createSession)
import System.Exit
import Graphics.X11.Xlib
import Data.Typeable
@@ -130,7 +130,7 @@ io = liftIO
spawn :: String -> X ()
spawn x = io $ do
pid <- forkProcess $ do
forkProcess (executeFile "/bin/sh" False ["-c", x] Nothing)
forkProcess (createSession >> executeFile "/bin/sh" False ["-c", x] Nothing)
exitWith ExitSuccess
return ()
getProcessStatus True False pid