From 0b63ee6cd56f57f172695cd25b7c7ec89281ba7e Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 15 Sep 2012 17:25:05 -0400
Subject: run git coprocesses with gitEnv

---
 Git/CheckAttr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Git/CheckAttr.hs')

diff --git a/Git/CheckAttr.hs b/Git/CheckAttr.hs
index 6b321f8b8..13a7287b1 100644
--- a/Git/CheckAttr.hs
+++ b/Git/CheckAttr.hs
@@ -22,7 +22,7 @@ type Attr = String
 checkAttrStart :: [Attr] -> Repo -> IO CheckAttrHandle
 checkAttrStart attrs repo = do
 	cwd <- getCurrentDirectory
-	h <- CoProcess.start "git" $ toCommand $ gitCommandLine params repo
+	h <- gitCoProcessStart params repo
 	return (h, attrs, cwd)
 	where
 		params =
-- 
cgit v1.2.3