diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2017-09-07 13:45:31 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-09-07 13:48:44 -0400 |
| commit | d910a94df7d6f5c87897c248586cb65523457f99 (patch) | |
| tree | 692446ec624e63ac8fa4aec72f0b5ee8e5d13723 /Remote/GCrypt.hs | |
| parent | 7bd9a9cad8b413f4b09f9ab11a9d6d7ce72b8336 (diff) | |
prevent exporttree=yes on remotes that don't support exports
Don't allow "exporttree=yes" to be set when the special remote
does not support exports. That would be confusing since the user would
set up a special remote for exports, but `git annex export` to it would
later fail.
This commit was supported by the NSF-funded DataLad project.
Diffstat (limited to 'Remote/GCrypt.hs')
| -rw-r--r-- | Remote/GCrypt.hs | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Remote/GCrypt.hs b/Remote/GCrypt.hs index dd681a75c..3270a1dc7 100644 --- a/Remote/GCrypt.hs +++ b/Remote/GCrypt.hs @@ -52,14 +52,15 @@ import Utility.Gpg import Utility.SshHost remote :: RemoteType -remote = RemoteType { - typename = "gcrypt", +remote = RemoteType + { typename = "gcrypt" -- Remote.Git takes care of enumerating gcrypt remotes too, -- and will call our gen on them. - enumerate = const (return []), - generate = gen, - setup = gCryptSetup -} + , enumerate = const (return []) + , generate = gen + , setup = gCryptSetup + , exportSupported = exportUnsupported + } chainGen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote) chainGen gcryptr u c gc = do |