From 1e5d450e5a2476c8796a33991450bc18be4bfd7b Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 9 Feb 2015 14:16:42 -0400
Subject: comment

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

(limited to 'Remote')

diff --git a/Remote/Git.hs b/Remote/Git.hs
index 328e39111..01fc0d663 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -506,7 +506,7 @@ fsckOnRemote r params
 			[ ("GIT_WORK_TREE", Git.repoPath r')
 			, ("GIT_DIR", Git.localGitDir r')
 			] environ
-		batchCommandEnv program (Param "fsck" : params) $ Just environ'
+		batchCommandEnv program (Param "fsck" : params) (Just environ')
 
 {- The passed repair action is run in the Annex monad of the remote. -}
 repairRemote :: Git.Repo -> Annex Bool -> Annex (IO Bool)
-- 
cgit v1.2.3