diff options
| -rw-r--r-- | src/Propellor/Server.hs | 3 |
1 files changed, 2 insertions, 1 deletions
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 |