propellor spin

This commit is contained in:
Joey Hess 2014-11-18 01:15:34 -04:00
parent c58b51fd94
commit bc6b199d53
Failed to extract signature
1 changed files with 1 additions and 1 deletions

View File

@ -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