diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-10-27 23:52:02 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-10-27 23:52:02 -0400 |
| commit | 894e2f7980052f1c331ba7780100ae0ad19856cb (patch) | |
| tree | affb9ffb3c77d4d8b12bf2cb6666ec28ce6a11a4 /src/Utility/Process/Shim.hs | |
| parent | 261d008d41e6656ce4ceafb8c0f0630d5795944a (diff) | |
use execProcessConcurrent everywhere
Found a reasonable clean way to make Utility.Process use
execProcessConcurrent, while still allowing copying updates to it from
git-annex.
Diffstat (limited to 'src/Utility/Process/Shim.hs')
| -rw-r--r-- | src/Utility/Process/Shim.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Utility/Process/Shim.hs b/src/Utility/Process/Shim.hs new file mode 100644 index 00000000..0da93bf7 --- /dev/null +++ b/src/Utility/Process/Shim.hs @@ -0,0 +1,8 @@ +module Utility.Process.Shim (module X, createProcess) where + +import System.Process as X hiding (createProcess) +import Propellor.Message (createProcessConcurrent) +import System.IO + +createProcess :: CreateProcess -> IO (Maybe Handle, Maybe Handle, Maybe Handle, ProcessHandle) +createProcess = createProcessConcurrent |