diff options
author | gwern0 <gwern0@gmail.com> | 2009-06-22 22:14:23 +0200 |
---|---|---|
committer | gwern0 <gwern0@gmail.com> | 2009-06-22 22:14:23 +0200 |
commit | b1bf3fafa40b1aec6886fb6f91f18676403efc46 (patch) | |
tree | 16f4792f5646f9fe58fc5bee583a89f32fc37d98 /XMonad/Prompt | |
parent | a728e9831a5cd78dae9c2b81925d2d91294f0892 (diff) | |
download | XMonadContrib-b1bf3fafa40b1aec6886fb6f91f18676403efc46.tar.gz XMonadContrib-b1bf3fafa40b1aec6886fb6f91f18676403efc46.tar.xz XMonadContrib-b1bf3fafa40b1aec6886fb6f91f18676403efc46.zip |
update callers of safeSpawn
Ignore-this: 484eca17b9877f7d587fc5bce8c5ae8a
darcs-hash:20090622201423-f7719-e2e02429f80ee2ef794680ebbffda67f1847835c.gz
Diffstat (limited to 'XMonad/Prompt')
-rw-r--r-- | XMonad/Prompt/Shell.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Prompt/Shell.hs b/XMonad/Prompt/Shell.hs index 4dc466a..782cb56 100644 --- a/XMonad/Prompt/Shell.hs +++ b/XMonad/Prompt/Shell.hs @@ -77,7 +77,7 @@ shellPrompt c = do prompt, unsafePrompt, safePrompt :: FilePath -> XPConfig -> X () prompt = unsafePrompt safePrompt c config = mkXPrompt Shell config (getShellCompl [c]) run - where run = safeSpawn c . encodeOutput + where run = safeSpawn c . return . encodeOutput unsafePrompt c config = mkXPrompt Shell config (getShellCompl [c]) run where run a = unsafeSpawn $ c ++ " " ++ encodeOutput a |