diff options
Diffstat (limited to 'Config.hs')
-rw-r--r-- | Config.hs | 8 |
1 files changed, 8 insertions, 0 deletions
@@ -86,6 +86,14 @@ setDirect b = do setConfig (annexConfig "direct") (Git.Config.boolConfig b) Annex.changeGitConfig $ \c -> c { annexDirect = b } +crippledFileSystem :: Annex Bool +crippledFileSystem = annexCrippledFileSystem <$> Annex.getGitConfig + +setCrippledFileSystem :: Bool -> Annex () +setCrippledFileSystem b = do + setConfig (annexConfig "crippledfilesystem") (Git.Config.boolConfig b) + Annex.changeGitConfig $ \c -> c { annexCrippledFileSystem = b } + {- Gets the http headers to use. -} getHttpHeaders :: Annex [String] getHttpHeaders = do |