diff options
author | Joey Hess <joey@kitenet.net> | 2013-03-03 15:18:24 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-03-03 15:18:24 -0400 |
commit | 49d0a553f8088862e9268942ebca5c5f36f5ff6b (patch) | |
tree | 5e58f788007a9ce85e35421c23604acf4dd7eb93 /Assistant | |
parent | 221bc8eefe4860e04c0f51ca0e986ea68e3036e5 (diff) |
fix
Diffstat (limited to 'Assistant')
-rw-r--r-- | Assistant/Threads/Committer.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Assistant/Threads/Committer.hs b/Assistant/Threads/Committer.hs index 99d01b580..5887f5e43 100644 --- a/Assistant/Threads/Committer.hs +++ b/Assistant/Threads/Committer.hs @@ -82,8 +82,7 @@ commitStaged = do Right _ -> do direct <- isDirect let params = nomessage $ catMaybes - [ Just $ Param "commit" - , Just $ Param "--quiet" + [ Just $ Param "--quiet" {- In indirect mode, avoid running the - usual git-annex pre-commit hook; - watch does the same symlink fixing, @@ -95,7 +94,7 @@ commitStaged = do - each other out, etc. Git returns nonzero on those, - so don't propigate out commit failures. -} void $ inRepo $ catchMaybeIO . - Git.Command.runQuiet params + Git.Command.runQuiet (Param "commit" : params) return True where nomessage ps |