problem running propellor --gitpush
This commit is contained in:
parent
ca95788019
commit
6cb060b653
|
@ -298,7 +298,7 @@ boot = do
|
||||||
hout <- dup stdOutput
|
hout <- dup stdOutput
|
||||||
hClose stdin
|
hClose stdin
|
||||||
hClose stdout
|
hClose stdout
|
||||||
unlessM (boolSystem "git" [Param "pull", Param $ "--upload=pack=./propellor --gitpush " ++ show hin ++ " " ++ show hout, Param "."]) $
|
unlessM (boolSystem "git" [Param "pull", Param "--upload=pack", Param $ "sh -c ./propellor --gitpush " ++ show hin ++ " " ++ show hout, Param "."]) $
|
||||||
warningMessage "git pull from client failed"
|
warningMessage "git pull from client failed"
|
||||||
|
|
||||||
-- Shim for git push over the propellor ssh channel.
|
-- Shim for git push over the propellor ssh channel.
|
||||||
|
|
Loading…
Reference in New Issue