summaryrefslogtreecommitdiff
path: root/Types/GitConfig.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Types/GitConfig.hs')
-rw-r--r--Types/GitConfig.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs
index fb25f2f26..af901fcf1 100644
--- a/Types/GitConfig.hs
+++ b/Types/GitConfig.hs
@@ -18,7 +18,7 @@ import Common
import qualified Git
import qualified Git.Config
import qualified Git.Construct
-import Git.SharedRepository
+import Git.ConfigTypes
import Utility.DataUnits
import Config.Cost
import Types.UUID
@@ -84,6 +84,7 @@ data GitConfig = GitConfig
, annexAddUnlocked :: Bool
, coreSymlinks :: Bool
, coreSharedRepository :: SharedRepository
+ , receiveDenyCurrentBranch :: DenyCurrentBranch
, gcryptId :: Maybe String
, gpgCmd :: GpgCmd
}
@@ -137,6 +138,7 @@ extractGitConfig r = GitConfig
, annexAddUnlocked = getbool (annex "addunlocked") False
, coreSymlinks = getbool "core.symlinks" True
, coreSharedRepository = getSharedRepository r
+ , receiveDenyCurrentBranch = getDenyCurrentBranch r
, gcryptId = getmaybe "core.gcrypt-id"
, gpgCmd = mkGpgCmd (getmaybe "gpg.program")
}