diff options
| author | Tomas Janousek <tomi@nomi.cz> | 2009-10-25 22:02:46 +0100 |
|---|---|---|
| committer | Tomas Janousek <tomi@nomi.cz> | 2009-10-25 22:02:46 +0100 |
| commit | ab33c0793f72bae9e5fe974c6e229fb8390508a5 (patch) | |
| tree | 5064ecd59895bbe039e336b384eb8bb135c81e30 | |
| parent | 70cdadc9b758bd1fee4a182a5be61d73b793021a (diff) | |
| download | XMonadContrib-ab33c0793f72bae9e5fe974c6e229fb8390508a5.tar.gz XMonadContrib-ab33c0793f72bae9e5fe974c6e229fb8390508a5.tar.xz XMonadContrib-ab33c0793f72bae9e5fe974c6e229fb8390508a5.zip | |
fix X.U.Run.spawnPipe fd leak
Ignore-this: 24375912d505963fafc917a63d0e79a0
darcs-hash:20091025210246-c9ff5-8862b42a8c811c272ae3e3bc864f32f58488e065.gz
| -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 |