propellor spin
This commit is contained in:
parent
c58b51fd94
commit
bc6b199d53
|
@ -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
|
||||
|
||||
|
|
Loading…
Reference in New Issue