diff options
author | Joey Hess <joey@kitenet.net> | 2014-01-13 14:41:10 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-01-13 14:41:10 -0400 |
commit | fa7934c035ff09b46d646353683c6d9745f0c94d (patch) | |
tree | ccdbbe618762679e9bc2932e8d92bbee86067fd9 /Types/GitConfig.hs | |
parent | 2d9784fae4ea1830865bc77de1a1c4c1b4ce3714 (diff) |
add GETAVAILABILITY to external special remote protocol
And some reworking of types, and added an annex-availability git config
setting.
Diffstat (limited to 'Types/GitConfig.hs')
-rw-r--r-- | Types/GitConfig.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs index 8623258a1..cda53f229 100644 --- a/Types/GitConfig.hs +++ b/Types/GitConfig.hs @@ -18,6 +18,7 @@ import qualified Git.Config import Utility.DataUnits import Config.Cost import Types.Distribution +import Types.Availability {- Main git-annex settings. Each setting corresponds to a git-config key - such as annex.foo -} @@ -101,6 +102,7 @@ data RemoteGitConfig = RemoteGitConfig , remoteAnnexTrustLevel :: Maybe String , remoteAnnexStartCommand :: Maybe String , remoteAnnexStopCommand :: Maybe String + , remoteAnnexAvailability :: Maybe Availability {- These settings are specific to particular types of remotes - including special remotes. -} @@ -130,6 +132,7 @@ extractRemoteGitConfig r remotename = RemoteGitConfig , remoteAnnexTrustLevel = notempty $ getmaybe "trustlevel" , remoteAnnexStartCommand = notempty $ getmaybe "start-command" , remoteAnnexStopCommand = notempty $ getmaybe "stop-command" + , remoteAnnexAvailability = getmayberead "availability" , remoteAnnexSshOptions = getoptions "ssh-options" , remoteAnnexRsyncOptions = getoptions "rsync-options" |