diff options
author | Adam Vogt <vogt.adam@gmail.com> | 2014-10-20 16:04:10 +0200 |
---|---|---|
committer | Adam Vogt <vogt.adam@gmail.com> | 2014-10-20 16:04:10 +0200 |
commit | 270c0e2a6998763a3f2b1d7de9722f8537c8b937 (patch) | |
tree | c7f5510ea12c7279fe27aadd233baec3e22253e6 | |
parent | b4c4a6fbede21e3585297e7fd9a8a7e0de782ec6 (diff) | |
download | xmonad-270c0e2a6998763a3f2b1d7de9722f8537c8b937.tar.gz xmonad-270c0e2a6998763a3f2b1d7de9722f8537c8b937.tar.xz xmonad-270c0e2a6998763a3f2b1d7de9722f8537c8b937.zip |
don't encode paths for spawnPID (#348)
Ignore-this: 6897bc8a39b7dd89164500c92f4ee43e
darcs-hash:20141020140410-1499c-a73db4e9c4c9a3ec8f5d687817ecde6b53772804.gz
-rw-r--r-- | src/XMonad/Core.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/XMonad/Core.hs b/src/XMonad/Core.hs index cef4f81..eb02704 100644 --- a/src/XMonad/Core.hs +++ b/src/XMonad/Core.hs @@ -32,7 +32,6 @@ module XMonad.Core ( import XMonad.StackSet hiding (modify) import Prelude -import Codec.Binary.UTF8.String (encodeString) import Control.Exception.Extensible (fromException, try, bracket, throw, finally, SomeException(..)) import qualified Control.Exception.Extensible as E import Control.Applicative @@ -406,7 +405,7 @@ spawn x = spawnPID x >> return () -- | Like 'spawn', but returns the 'ProcessID' of the launched application spawnPID :: MonadIO m => String -> m ProcessID -spawnPID x = xfork $ executeFile "/bin/sh" False ["-c", encodeString x] Nothing +spawnPID x = xfork $ executeFile "/bin/sh" False ["-c", x] Nothing -- | A replacement for 'forkProcess' which resets default signal handlers. xfork :: MonadIO m => IO () -> m ProcessID |