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

propellor spin

This commit is contained in:
Joey Hess 2014-03-31 16:45:32 -04:00
parent f9d6227d9d
commit 19627d9ec9
Failed to extract signature
1 changed files with 9 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
Propellor/CmdLine.hs
View File

@ -142,17 +142,16 @@ spin host = do
user = "root@"++host user = "root@"++host
bootstrapcmd = shellWrap $ intercalate " && " bootstrapcmd = shellWrap $ intercalate " && "
[ intercalate " ; " [ "if [ ! -d " ++ localdir ++ " ]"
[ "if [ ! -d " ++ localdir ++ " ]" , "then " ++ intercalate " && "
, "then " ++ intercalate " && " [ "apt-get -y install git"
[ "apt-get -y install git" , "echo " ++ toMarked statusMarker (show NeedGitClone)
, "echo " ++ toMarked statusMarker (show NeedGitClone) ]
] , "else " ++ intercalate " && "
, "fi" [ "cd " ++ localdir
, "if [ ! -x ./propellor ]; then make build; fi"
, "./propellor --boot " ++ host
] ]
, "cd " ++ localdir
, "make build"
, "./propellor --boot " ++ host
] ]
getstatus :: Handle -> IO BootStrapStatus getstatus :: Handle -> IO BootStrapStatus