fix command again
This commit is contained in:
parent
24a3f1bf8a
commit
18ac1234ac
|
@ -306,7 +306,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", Param $ "sh -c ./propellor --gitpush " ++ show hin ++ " " ++ show hout, Param "."]) $
|
unlessM (boolSystem "git" [Param "pull", Param "--upload-pack", Param $ "./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