aboutsummaryrefslogtreecommitdiff
path: root/Types/GitConfig.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-01-24 12:58:52 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-01-24 12:58:52 -0400
commitb87811c4b55d66b1edb26c73e6578ca9f2994a65 (patch)
treef41a9b52b1fecaac946814a2ae5a1f303f6a542a /Types/GitConfig.hs
parent3bb7ecf0d30a8ecb89d075c808f529a7a3ea874b (diff)
added annex.secure-erase-command config option.
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 148d73b93..fa0fdc65a 100644
--- a/Types/GitConfig.hs
+++ b/Types/GitConfig.hs
@@ -48,6 +48,7 @@ data GitConfig = GitConfig
, annexFsckNudge :: Bool
, annexAutoUpgrade :: AutoUpgrade
, annexExpireUnused :: Maybe (Maybe Duration)
+ , annexSecureEraseCommand :: Maybe String
, coreSymlinks :: Bool
, gcryptId :: Maybe String
}
@@ -79,6 +80,7 @@ extractGitConfig r = GitConfig
, annexAutoUpgrade = toAutoUpgrade $ getmaybe (annex "autoupgrade")
, annexExpireUnused = maybe Nothing Just . parseDuration
<$> getmaybe (annex "expireunused")
+ , annexSecureEraseCommand = getmaybe (annex "secure-erase-command")
, coreSymlinks = getbool "core.symlinks" True
, gcryptId = getmaybe "core.gcrypt-id"
}