diff options
Diffstat (limited to 'Remote/P2P.hs')
| -rw-r--r-- | Remote/P2P.hs | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Remote/P2P.hs b/Remote/P2P.hs index f51b73b33..be0d4589f 100644 --- a/Remote/P2P.hs +++ b/Remote/P2P.hs @@ -34,14 +34,15 @@ import Control.Concurrent import Control.Concurrent.STM remote :: RemoteType -remote = RemoteType { - typename = "p2p", +remote = RemoteType + { typename = "p2p" -- Remote.Git takes care of enumerating P2P remotes, -- and will call chainGen on them. - enumerate = const (return []), - generate = \_ _ _ _ -> return Nothing, - setup = error "P2P remotes are set up using git-annex p2p" -} + , enumerate = const (return []) + , generate = \_ _ _ _ -> return Nothing + , setup = error "P2P remotes are set up using git-annex p2p" + , exportSupported = exportUnsupported + } chainGen :: P2PAddress -> Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote) chainGen addr r u c gc = do |