diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-10-31 22:19:25 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-10-31 22:19:25 -0400 |
| commit | 11efa7ef609a99de2841772e415cd2808ee438b8 (patch) | |
| tree | e67d7cdb8b0b8b72d92d2a28d042aa1723204d5f /Remotes.hs | |
| parent | 228b32d473abb72bb26ff8eca008387190428c44 (diff) | |
more escaping for ssh
Diffstat (limited to 'Remotes.hs')
| -rw-r--r-- | Remotes.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remotes.hs b/Remotes.hs index b36856b54..135a701ff 100644 --- a/Remotes.hs +++ b/Remotes.hs @@ -232,6 +232,6 @@ runCmd r command params = do then do liftIO $ boolSystem "ssh" [Git.urlHost r, "cd " ++ (shellEscape $ Git.workTree r) ++ - " && " ++ command ++ " " ++ - unwords params] + " && " ++ (shellEscape command) ++ " " ++ + (unwords $ map shellEscape params)] else error "running command in non-ssh repo not supported" |