propellor spin

This commit is contained in:
Joey Hess 2014-11-22 17:16:25 -04:00
parent a527af06a5
commit aa986724a2
Failed to extract signature
1 changed files with 2 additions and 1 deletions

View File

@ -161,7 +161,8 @@ sendPrecompiled hn = void $ actionMessage ("Uploading locally compiled propellor
createDirectoryIfMissing True (tmpdir </> shimdir)
changeWorkingDirectory (tmpdir </> shimdir)
me <- readSymbolicLink "/proc/self/exe"
shim <- Shim.setup me "."
me' <- catchDefaultIO me (readSymbolicLink me)
shim <- Shim.setup me' "."
when (shim /= "propellor") $
renameFile shim "propellor"
changeWorkingDirectory tmpdir