aboutsummaryrefslogtreecommitdiff
path: root/Config.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-05-24 15:48:22 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-05-24 15:58:27 -0400
commit475d3dbf61a111e7ad7edfbc53df9af60b62bdb5 (patch)
tree08f8a5aa9a0f7d7f80b835c3bf6bb0f262697bcb /Config.hs
parentba3bc0d631702ce91f1044985f2c3f533fb4f95d (diff)
enableremote: Remove annex-ignore configuration from a remote.
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Config.hs b/Config.hs
index 0ff688dac..75d7b4ce7 100644
--- a/Config.hs
+++ b/Config.hs
@@ -80,6 +80,12 @@ setRemoteCost r c = setConfig (remoteConfig r "cost") (show c)
setRemoteAvailability :: Git.Repo -> Availability -> Annex ()
setRemoteAvailability r c = setConfig (remoteConfig r "availability") (show c)
+setRemoteIgnore :: Git.Repo -> Bool -> Annex ()
+setRemoteIgnore r b = setConfig (remoteConfig r "ignore") (Git.Config.boolConfig b)
+
+setRemoteBare :: Git.Repo -> Bool -> Annex ()
+setRemoteBare r b = setConfig (remoteConfig r "bare") (Git.Config.boolConfig b)
+
isDirect :: Annex Bool
isDirect = annexDirect <$> Annex.getGitConfig