mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

ignore hook exit status

Browse source
This commit is contained in:
Joey Hess 2012-03-14 12:39:09 -04:00
parent 42a6694ca1
commit 6cb4743cfb
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Command/Commit.hs
View file

@ -22,7 +22,8 @@ seek = [withNothing start]
start :: CommandStart
start = next $ next $ do
Annex.Branch.commit "update"
runhook =<< (inRepo $ Git.hookPath "annex-content")
_ <- runhook =<< (inRepo $ Git.hookPath "annex-content")
return True
where
runhook (Just hook) = liftIO $ boolSystem hook []
runhook Nothing = return True