summaryrefslogtreecommitdiff
path: root/src/Propellor/CmdLine.hs
diff options
context:
space:
mode:
authorJoey Hess2014-11-22 16:20:02 -0400
committerJoey Hess2014-11-22 16:20:02 -0400
commita4edc404f0d91db54e13dace7be265a2611de5d6 (patch)
treed8b7f4f84904852139e812b5109b57ca2350d3fb /src/Propellor/CmdLine.hs
parentdca7ec5d2c7503cefda77d24bb22312caad9ac4d (diff)
propellor spin
Diffstat (limited to 'src/Propellor/CmdLine.hs')
-rw-r--r--src/Propellor/CmdLine.hs8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index 7002a3f6..11193ab3 100644
--- a/src/Propellor/CmdLine.hs
+++ b/src/Propellor/CmdLine.hs
@@ -166,11 +166,9 @@ spin target relay hst = do
void $ actionMessage "Push to central git repository" $
boolSystem "git" [Param "push"]
- cacheparams <- if False
- then pure []
- else if viarelay
- then pure ["-A"]
- else toCommand <$> sshCachingParams hn viarelay
+ cacheparams <- if viarelay
+ then pure ["-A"]
+ else toCommand <$> sshCachingParams hn
when viarelay $
void $ boolSystem "ssh-add" []