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

fix handling of nonexistant hook

Browse source
This commit is contained in:
Joey Hess 2014-03-03 13:59:36 -04:00
parent cf8788fb49
commit 04b77328ef
Failed to extract signature
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Annex/Hook.hs
View file

@ -65,6 +65,7 @@ runAnnexHook hook = do
when exists $ when exists $
run cmd run cmd
where where
hookexists f = liftIO $ isExecutable . fileMode <$> getFileStatus f hookexists f = liftIO $ catchBoolIO $
isExecutable . fileMode <$> getFileStatus f
run cmd = unlessM (liftIO $ boolSystem cmd []) $ run cmd = unlessM (liftIO $ boolSystem cmd []) $
warning $ cmd ++ " failed" warning $ cmd ++ " failed"