cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Propellor/CmdLine.hs
View File

@ -187,7 +187,7 @@ spin hn hst = do
cacheparams <- toCommand <$> sshCachingParams hn cacheparams <- toCommand <$> sshCachingParams hn
go cacheparams url =<< hostprivdata go cacheparams url =<< hostprivdata
unlessM (boolSystem "ssh" (map Param (cacheparams ++ ["-t", user, spincmd]))) $ unlessM (boolSystem "ssh" (map Param (cacheparams ++ ["-t", user, spincmd]))) $
error "remote propellor failed" error $ "remote propellor failed (running: " ++ spincmd ++")"
where where
hostprivdata = show . filterPrivData hst <$> decryptPrivData hostprivdata = show . filterPrivData hst <$> decryptPrivData