automatically set and unset core.bare when switching to/from direct mode

This commit is contained in:
Joey Hess 2013-11-05 15:31:37 -04:00
parent 0edd9ec03a
commit 04768e44b2
4 changed files with 18 additions and 7 deletions

View file

@ -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