diff options
Diffstat (limited to 'Types/GitConfig.hs')
| -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 f93ef1529..30214bc29 100644 --- a/Types/GitConfig.hs +++ b/Types/GitConfig.hs @@ -33,6 +33,7 @@ data GitConfig = GitConfig , annexDelayAdd :: Maybe Int , annexHttpHeaders :: [String] , annexHttpHeadersCommand :: Maybe String + , annexAutoCommit :: Bool } extractGitConfig :: Git.Repo -> GitConfig @@ -51,6 +52,7 @@ extractGitConfig r = GitConfig , annexDelayAdd = getmayberead "delayadd" , annexHttpHeaders = getlist "http-headers" , annexHttpHeadersCommand = getmaybe "http-headers-command" + , annexAutoCommit = getbool "autocommit" True } where get k def = fromMaybe def $ getmayberead k |