diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-06-17 20:41:17 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-06-17 20:41:27 -0400 |
| commit | fa8116c070eb695f27e56a1e6384b8ef59bb40d8 (patch) | |
| tree | 7338a60fc2e6c6e7d22c696006a4bf9cce1b1a7e /Types | |
| parent | 4dfa412c10bf5811858da509cef8558c8bcc0be3 (diff) | |
annex.debug can now be set to enable debug logging by default. The webapp's debugging check box does this.
Diffstat (limited to 'Types')
| -rw-r--r-- | Types/GitConfig.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs index 888795cbb..d5d234ca9 100644 --- a/Types/GitConfig.hs +++ b/Types/GitConfig.hs @@ -35,6 +35,7 @@ data GitConfig = GitConfig , annexHttpHeaders :: [String] , annexHttpHeadersCommand :: Maybe String , annexAutoCommit :: Bool + , annexDebug :: Bool , annexWebOptions :: [String] , annexWebDownloadCommand :: Maybe String , annexCrippledFileSystem :: Bool @@ -59,6 +60,7 @@ extractGitConfig r = GitConfig , annexHttpHeaders = getlist (annex "http-headers") , annexHttpHeadersCommand = getmaybe (annex "http-headers-command") , annexAutoCommit = getbool (annex "autocommit") True + , annexDebug = getbool (annex "debug") False , annexWebOptions = getwords (annex "web-options") , annexWebDownloadCommand = getmaybe (annex "web-download-command") , annexCrippledFileSystem = getbool (annex "crippledfilesystem") False |