run git coprocesses with gitEnv
This commit is contained in:
parent
e1baf48d88
commit
0b63ee6cd5
6 changed files with 12 additions and 6 deletions
|
@ -29,7 +29,7 @@ import qualified Utility.CoProcess as CoProcess
|
|||
type CatFileHandle = CoProcess.CoProcessHandle
|
||||
|
||||
catFileStart :: Repo -> IO CatFileHandle
|
||||
catFileStart = CoProcess.start "git" . toCommand . gitCommandLine
|
||||
catFileStart = gitCoProcessStart
|
||||
[ Param "cat-file"
|
||||
, Param "--batch"
|
||||
]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue