aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Util
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Util')
-rw-r--r--XMonad/Util/Run.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/XMonad/Util/Run.hs b/XMonad/Util/Run.hs
index bc35d9c..9057747 100644
--- a/XMonad/Util/Run.hs
+++ b/XMonad/Util/Run.hs
@@ -141,4 +141,5 @@ spawnPipe x = do
uninstallSignalHandlers
dupTo rd stdInput
executeFile "/bin/sh" False ["-c", x] Nothing
+ closeFd rd
return h