summaryrefslogtreecommitdiff
path: root/src/Propellor/CmdLine.hs
diff options
context:
space:
mode:
authorJoey Hess2014-11-18 19:33:11 -0400
committerJoey Hess2014-11-18 19:33:11 -0400
commit65d3f085dcd86c53549a3b126e0888f09c5e1925 (patch)
tree4c8071b37cbc1cee3af2ed816242936164de57ab /src/Propellor/CmdLine.hs
parent907ecfb464516cf30c2e54e63b17e4c79306f46e (diff)
remove what should be dead code
While old propellor's can emit Ready, they won't if they've managed to updateFirst. If updateFirst fails due to eg, inaccessiable central repo, those old propellor's are not able to receive inline git pushes anyway, so are not going to update no matter what, so no point in making --spin work in that case.
Diffstat (limited to 'src/Propellor/CmdLine.hs')
-rw-r--r--src/Propellor/CmdLine.hs10
1 files changed, 0 insertions, 10 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index df4d44a6..66da6339 100644
--- a/src/Propellor/CmdLine.hs
+++ b/src/Propellor/CmdLine.hs
@@ -233,16 +233,6 @@ spin hn hst = do
hClose fromh
sendGitClone hn
comm cacheparams privdata
- -- Ready is only sent by old versions of
- -- propellor. They expect to get privdata,
- -- and then no more protocol communication.
- dispatch (Just Ready) = do
- sendprivdata toh privdata
- hClose toh
- -- Display remaining output.
- void $ tryIO $ forever $
- putStrLn =<< hGetLine fromh
- hClose fromh
dispatch Nothing = return ()
user = "root@"++hn