From 0fa21aaa036f11b679d5d81a7ba04e6766e630a8 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 31 Dec 2015 00:56:04 -0400 Subject: spin --via: Avoid committing on relay host. --- src/Propellor/CmdLine.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Propellor/CmdLine.hs') diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs index 4a4f71fe..1e61adc8 100644 --- a/src/Propellor/CmdLine.hs +++ b/src/Propellor/CmdLine.hs @@ -118,7 +118,7 @@ defaultMain hostlist = withConcurrentOutput $ do go True cmdline@(Spin _ _) = buildFirst cmdline $ go False cmdline go True cmdline = updateFirst cmdline $ go False cmdline go False (Spin hs mrelay) = do - commitSpin + unless (isJust mrelay) commitSpin forM_ hs $ \hn -> withhost hn $ spin mrelay hn go False cmdline@(SimpleRun hn) = do forceConsole -- cgit v1.2.3