aboutsummaryrefslogtreecommitdiff
path: root/Assistant/Install.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-09-26 18:59:18 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-09-26 18:59:18 -0400
commit051381badc632649db4f37618fbd79292f0b92f5 (patch)
tree540060f3bb3bd1a980e689d34fe04ae5fc6514c9 /Assistant/Install.hs
parent1ffa0436e6353a2b37f5e8b02553fe6c697bf468 (diff)
use ~/.ssh/git-annex-shell wrapper
This was needed for the OSX self-contained app, but is a generally good idea. It avoids needing perl; is probably faster; and could eventually be replaced by something faster yet.
Diffstat (limited to 'Assistant/Install.hs')
-rw-r--r--Assistant/Install.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Assistant/Install.hs b/Assistant/Install.hs
index b404bc4b6..72a511736 100644
--- a/Assistant/Install.hs
+++ b/Assistant/Install.hs
@@ -47,7 +47,8 @@ ensureInstalled = do
let content = unlines
[ "#!/bin/sh"
, "set -e"
- , "exec", base </> "runshell" ++ " git-annex-shell \"$@\""
+ , "exec", base </> "runshell" ++
+ " git-annex-shell -c \"$SSH_ORIGINAL_COMMAND\""
]
curr <- catchDefaultIO "" $ readFile shim
when (curr /= content) $ do