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 | 16eb2f976c7b217ae23411ef10ec23f0592cc9bc (patch) | |
| tree | fdce10133af72faff1a581c5adf16fd6346d5902 /Remote/BitTorrent.hs | |
| parent | 45d30820ac71d61802884047ccedd3ed60c5cb07 (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/BitTorrent.hs')
| -rw-r--r-- | Remote/BitTorrent.hs | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Remote/BitTorrent.hs b/Remote/BitTorrent.hs index 9a1be1c0ea..37594bd110 100644 --- a/Remote/BitTorrent.hs +++ b/Remote/BitTorrent.hs @@ -36,12 +36,13 @@ import qualified Data.ByteString.Lazy as B #endif remote :: RemoteType -remote = RemoteType { - typename = "bittorrent", - enumerate = list, - generate = gen, - setup = error "not supported" -} +remote = RemoteType + { typename = "bittorrent" + , enumerate = list + , generate = gen + , setup = error "not supported" + , exportSupported = exportUnsupported + } -- There is only one bittorrent remote, and it always exists. list :: Bool -> Annex [Git.Repo] |