summaryrefslogtreecommitdiff
path: root/src/Propellor/Server.hs
diff options
context:
space:
mode:
authorJoey Hess2014-11-22 00:27:35 -0400
committerJoey Hess2014-11-22 00:27:35 -0400
commit99e0a5fea733fbeb18ee8fa4556994a50e470b7b (patch)
tree4398ae2ccbf40bcaf84dceaa68340ef0274701be /src/Propellor/Server.hs
parent7fd338f96f5852ea309bd4a2964bf93d06062086 (diff)
propellor spin
Diffstat (limited to 'src/Propellor/Server.hs')
-rw-r--r--src/Propellor/Server.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Server.hs b/src/Propellor/Server.hs
index a8cd6a00..eff56997 100644
--- a/src/Propellor/Server.hs
+++ b/src/Propellor/Server.hs
@@ -131,7 +131,7 @@ sendPrecompiled hn = void $ actionMessage ("Uploading locally compiled propellor
bracket getWorkingDirectory changeWorkingDirectory $ \_ -> do
changeWorkingDirectory tmpdir
let shimdir = "propellor"
- let me = localdir </> "propellor"
+ me <- readSymbolicLink "/proc/self/exe"
void $ Shim.setup me shimdir
withTmpFile "propellor.tar" $ \tarball _ -> allM id
[ boolSystem "strip" [File me]