summaryrefslogtreecommitdiff
path: root/Config.hs
diff options
context:
space:
mode:
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