summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJoey Hess2014-11-18 16:24:45 -0400
committerJoey Hess2014-11-18 16:24:45 -0400
commit935e1d11fe9cfe5d177e18323be32e093698697a (patch)
tree07c1309ec941db3799e0982eb6390ba9ceeaef82 /src
parentac84d6d1026adcfd39c4204b97fbc67b2f787423 (diff)
propellor spin
Diffstat (limited to 'src')
-rw-r--r--src/Propellor/CmdLine.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index e84a220e..7b20574a 100644
--- a/src/Propellor/CmdLine.hs
+++ b/src/Propellor/CmdLine.hs
@@ -218,7 +218,8 @@ spin hn hst = do
sendMarked toh gitPushMarker ""
let p = (proc "git" ["upload-pack", "."])
{ std_in = UseHandle fromh
- , std_out = UseHandle toh }
+ , std_out = UseHandle toh
+ }
(Nothing, Nothing, Nothing, h) <- createProcess p
unlessM ((==) ExitSuccess <$> waitForProcess h) $
warningMessage "git upload-pack failed"