diff options
Diffstat (limited to 'Annex')
| -rw-r--r-- | Annex/Hook.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Annex/Hook.hs b/Annex/Hook.hs index a6fcf7131..4848e2d61 100644 --- a/Annex/Hook.hs +++ b/Annex/Hook.hs @@ -65,6 +65,7 @@ runAnnexHook hook = do when exists $ run cmd where - hookexists f = liftIO $ isExecutable . fileMode <$> getFileStatus f + hookexists f = liftIO $ catchBoolIO $ + isExecutable . fileMode <$> getFileStatus f run cmd = unlessM (liftIO $ boolSystem cmd []) $ warning $ cmd ++ " failed" |