diff options
Diffstat (limited to 'XMonad/Prompt/Shell.hs')
-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 |