diff options
| -rw-r--r-- | XMonad/Util/Run.hs | 1 |
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 |