diff --git a/CHANGELOG b/CHANGELOG index 8ed28ad157..e748e4e7ea 100644 --- a/CHANGELOG +++ b/CHANGELOG @@ -5,6 +5,8 @@ git-annex (7.20191219) UNRELEASED; urgency=medium like get also sped up in cases where they have to check a lot of files but only transfer a few files. Speedups range from 30-100%. * Added build dependency on the filepath-bytestring library. + * Fixed an oversight that had always prevented annex.resolvemerge + from being honored, when it was configured by git-annex config. -- Joey Hess Wed, 18 Dec 2019 15:12:40 -0400 diff --git a/Config/GitConfig.hs b/Config/GitConfig.hs index 5795129fee..2df0525cd8 100644 --- a/Config/GitConfig.hs +++ b/Config/GitConfig.hs @@ -15,7 +15,10 @@ import Logs.Config {- Gets a specific setting from GitConfig. If necessary, loads the - repository-global defaults when the GitConfig does not yet - - have a value. -} + - have a value. + - + - Note: Be sure to add the config value to mergeGitConfig. + -} getGitConfigVal :: (GitConfig -> Configurable a) -> Annex a getGitConfigVal f = do v <- f <$> Annex.getGitConfig diff --git a/Logs/Config.hs b/Logs/Config.hs index 1271c9826c..2369eac3c4 100644 --- a/Logs/Config.hs +++ b/Logs/Config.hs @@ -46,6 +46,7 @@ unsetGlobalConfig name = do setGlobalConfig' name (ConfigValue mempty) -- Reads the global config log every time. +-- It's more efficient to use Config.GitConfig. getGlobalConfig :: ConfigKey -> Annex (Maybe ConfigValue) getGlobalConfig name = M.lookup name <$> loadGlobalConfig diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs index df2cd6bb1f..2ad194bb98 100644 --- a/Types/GitConfig.hs +++ b/Types/GitConfig.hs @@ -221,6 +221,7 @@ mergeGitConfig :: GitConfig -> GitConfig -> GitConfig mergeGitConfig gitconfig repoglobals = gitconfig { annexAutoCommit = merge annexAutoCommit , annexSyncContent = merge annexSyncContent + , annexResolveMerge = merge annexResolveMerge } where merge f = case f gitconfig of