summaryrefslogtreecommitdiff
path: root/Config.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-06-02 16:59:15 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-06-02 16:59:47 -0400
commited9cdb350e0bae8523b9d60cd414730c7d515829 (patch)
tree34a4da75125165dc6cd992c68decccec7f74bc1f /Config.hs
parentbfc9f0cb3094da50c6d6e22242978513bee8a622 (diff)
refactor isBareRepo
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Config.hs b/Config.hs
index 75d7b4ce7..be60852da 100644
--- a/Config.hs
+++ b/Config.hs
@@ -86,6 +86,9 @@ setRemoteIgnore r b = setConfig (remoteConfig r "ignore") (Git.Config.boolConfig
setRemoteBare :: Git.Repo -> Bool -> Annex ()
setRemoteBare r b = setConfig (remoteConfig r "bare") (Git.Config.boolConfig b)
+isBareRepo :: Annex Bool
+isBareRepo = fromRepo Git.repoIsLocalBare
+
isDirect :: Annex Bool
isDirect = annexDirect <$> Annex.getGitConfig