diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-02-09 14:16:42 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-02-09 14:16:42 -0400 |
| commit | 1e5d450e5a2476c8796a33991450bc18be4bfd7b (patch) | |
| tree | 80c679082a677d786a0fe8cf0db98acb171613e5 /Remote | |
| parent | 554be78d4e068140488cbf669590aae0a528b40d (diff) | |
comment
Diffstat (limited to 'Remote')
| -rw-r--r-- | Remote/Git.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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) |