From aa986724a2fa56aba0b8584deb33536d24d7f66d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 22 Nov 2014 17:16:25 -0400 Subject: propellor spin --- src/Propellor/Server.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/Server.hs b/src/Propellor/Server.hs index be2eb1d3..3fd34a51 100644 --- a/src/Propellor/Server.hs +++ b/src/Propellor/Server.hs @@ -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 -- cgit v1.2.3