diff options
| author | Joey Hess <joey@kitenet.net> | 2014-11-18 16:12:27 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-11-18 16:12:27 -0400 |
| commit | 06add92bce29789eda12cd41b61fe8fde2f64ff4 (patch) | |
| tree | 10893d02f3cc944811342627479b8f93a3e824d7 /src/Propellor | |
| parent | 1468ef4bfe4a4e26cc10cb15b60b9a1f78bdefa5 (diff) | |
tweak
Diffstat (limited to 'src/Propellor')
| -rw-r--r-- | src/Propellor/CmdLine.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs index f8d5d57d..e84a220e 100644 --- a/src/Propellor/CmdLine.hs +++ b/src/Propellor/CmdLine.hs @@ -221,7 +221,7 @@ spin hn hst = do , std_out = UseHandle toh } (Nothing, Nothing, Nothing, h) <- createProcess p unlessM ((==) ExitSuccess <$> waitForProcess h) $ - warningMessage "git send-pack failed" + warningMessage "git upload-pack failed" -- no more protocol possible after -- git push Just NeedGitClone -> do @@ -324,7 +324,6 @@ gitPush hin hout = void $ fromstdin `concurrently` tostdout connect fromh toh = do b <- B.hGetSome fromh 40960 unless (B.null b) $ do - hPutStrLn stderr $ show ("got", fromh, b) B.hPut toh b hFlush toh connect fromh toh |