diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-05-06 14:29:12 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-05-06 14:29:12 -0400 |
| commit | 9ec4b33dbb62e42b8d284d1aeddf32a395fd7cc0 (patch) | |
| tree | b9067a945a430af4868be1a0fcf052db5c4cd5fc /src/Propellor/Spin.hs | |
| parent | b4877efea5375cb83951d6dd1d3dbf9d70208cf8 (diff) | |
| parent | 160eff0eb7ebbb2da2c3864dbe83bf7db76c8bb6 (diff) | |
Merge branch 'joeyconfig'
Diffstat (limited to 'src/Propellor/Spin.hs')
| -rw-r--r-- | src/Propellor/Spin.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs index f55f2977..986305d7 100644 --- a/src/Propellor/Spin.hs +++ b/src/Propellor/Spin.hs @@ -12,7 +12,6 @@ import System.PosixCompat import System.Posix.IO import System.Posix.Directory import Control.Concurrent.Async -import Control.Exception (bracket) import qualified Data.ByteString as B import qualified Data.Set as S import qualified Network.BSD as BSD @@ -168,7 +167,7 @@ updateServer -> CreateProcess -> IO () updateServer target relay hst connect haveprecompiled = - withBothHandles createProcessSuccess connect go + withIOHandles createProcessSuccess connect go where hn = fromMaybe target relay relaying = relay == Just target |