diff options
Diffstat (limited to 'XMonad/Prompt/Email.hs')
| -rw-r--r-- | XMonad/Prompt/Email.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Prompt/Email.hs b/XMonad/Prompt/Email.hs index 99c1e8f..a0eb72e 100644 --- a/XMonad/Prompt/Email.hs +++ b/XMonad/Prompt/Email.hs @@ -59,5 +59,5 @@ emailPrompt c addrs = inputPromptWithCompl c "To" (mkComplFunFromList addrs) ?+ \to -> inputPrompt c "Subject" ?+ \subj -> inputPrompt c "Body" ?+ \body -> - io $ runProcessWithInput "mail" ["-s", subj, to] (body ++ "\n") + runProcessWithInput "mail" ["-s", subj, to] (body ++ "\n") >> return () |