From bc6b199d537c5bee3ad0822c24650e06ae5d1cd5 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 18 Nov 2014 01:15:34 -0400 Subject: propellor spin --- src/Propellor/CmdLine.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs index c31a5cbb..6dd36f9f 100644 --- a/src/Propellor/CmdLine.hs +++ b/src/Propellor/CmdLine.hs @@ -187,7 +187,7 @@ spin hn hst = do cacheparams <- toCommand <$> sshCachingParams hn go cacheparams url =<< hostprivdata unlessM (boolSystem "ssh" (map Param (cacheparams ++ ["-t", user, spincmd]))) $ - error "remote propellor failed" + error $ "remote propellor failed (running: " ++ spincmd ++")" where hostprivdata = show . filterPrivData hst <$> decryptPrivData -- cgit v1.2.3