diff options
Diffstat (limited to 'Init.hs')
-rw-r--r-- | Init.hs | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -65,9 +65,7 @@ gitPreCommitHookUnWrite = unlessBare $ do " Edit it to remove call to git annex." unlessBare :: Annex () -> Annex () -unlessBare a = do - g <- gitRepo - unless (Git.repoIsLocalBare g) a +unlessBare = unlessM $ Git.repoIsLocalBare <$> gitRepo preCommitHook :: Annex FilePath preCommitHook = do |