aboutsummaryrefslogtreecommitdiff
path: root/Config.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/Config.hs b/Config.hs
index ac251983a..475cb83ec 100644
--- a/Config.hs
+++ b/Config.hs
@@ -73,8 +73,11 @@ isDirect = annexDirect <$> Annex.getGitConfig
setDirect :: Bool -> Annex ()
setDirect b = do
- setConfig (annexConfig "direct") (Git.Config.boolConfig b)
+ setConfig (annexConfig "direct") val
+ setConfig (ConfigKey Git.Config.coreBare) val
Annex.changeGitConfig $ \c -> c { annexDirect = b }
+ where
+ val = Git.Config.boolConfig b
crippledFileSystem :: Annex Bool
crippledFileSystem = annexCrippledFileSystem <$> Annex.getGitConfig