aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <spencerjanssen@gmail.com>2009-12-27 01:35:01 +0100
committerSpencer Janssen <spencerjanssen@gmail.com>2009-12-27 01:35:01 +0100
commitd100f1a335b4366b99f49c6594c63a5e3a40c2bd (patch)
tree431b002b66ea937896bce08acb512664ed482f5c
parentcbca3f90da8a21d5b5d929748604aec78ccb0ebb (diff)
downloadXMonadContrib-d100f1a335b4366b99f49c6594c63a5e3a40c2bd.tar.gz
XMonadContrib-d100f1a335b4366b99f49c6594c63a5e3a40c2bd.tar.xz
XMonadContrib-d100f1a335b4366b99f49c6594c63a5e3a40c2bd.zip
Fix the createSession bug in spawnPipe
Ignore-this: 2d7f8746eb657036d39f3b9aac22b3c9 Both the new XMonad.Core.xfork function and spawnPipe call createSession, calling this function twice results in an error. darcs-hash:20091227003501-25a6b-5a23d578f0a0f368e28041b7be7defb532dd9ef3.gz
-rw-r--r--XMonad/Util/Run.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/XMonad/Util/Run.hs b/XMonad/Util/Run.hs
index fe1949c..c884818 100644
--- a/XMonad/Util/Run.hs
+++ b/XMonad/Util/Run.hs
@@ -32,7 +32,7 @@ module XMonad.Util.Run (
) where
import System.Posix.IO
-import System.Posix.Process (executeFile, createSession)
+import System.Posix.Process (executeFile)
import Control.Concurrent (threadDelay)
import Control.Exception (try) -- use OldException with base 4
import System.IO
@@ -136,8 +136,6 @@ spawnPipe x = io $ do
h <- fdToHandle wr
hSetBuffering h LineBuffering
xfork $ do
- createSession
- uninstallSignalHandlers
dupTo rd stdInput
executeFile "/bin/sh" False ["-c", x] Nothing
closeFd rd