aboutsummaryrefslogtreecommitdiff
path: root/Types/GitConfig.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-03-01 00:31:17 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-03-01 00:31:17 -0400
commit518e5430afd0f85b1b6c334b887df24e3fbd8933 (patch)
tree75979e10ac21973596f7c28abbabdc5b7dbdf1fc /Types/GitConfig.hs
parent4026f786267b990e81b9768a46a410a90488eb76 (diff)
annex.listen can be configured, instead of using --listen
Diffstat (limited to 'Types/GitConfig.hs')
-rw-r--r--Types/GitConfig.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs
index 65984a108..ddcf6da50 100644
--- a/Types/GitConfig.hs
+++ b/Types/GitConfig.hs
@@ -50,6 +50,7 @@ data GitConfig = GitConfig
, annexExpireUnused :: Maybe (Maybe Duration)
, annexSecureEraseCommand :: Maybe String
, annexGenMetaData :: Bool
+ , annexListen :: Maybe String
, coreSymlinks :: Bool
, gcryptId :: Maybe String
}
@@ -83,6 +84,7 @@ extractGitConfig r = GitConfig
<$> getmaybe (annex "expireunused")
, annexSecureEraseCommand = getmaybe (annex "secure-erase-command")
, annexGenMetaData = getbool (annex "genmetadata") False
+ , annexListen = getmaybe (annex "listen")
, coreSymlinks = getbool "core.symlinks" True
, gcryptId = getmaybe "core.gcrypt-id"
}