aboutsummaryrefslogtreecommitdiff
path: root/RemoteDaemon
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2018-03-07 13:15:55 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2018-03-07 13:15:55 -0400
commit0b98b883e40d1019ff9cdcd6c9ff58079ffe68b6 (patch)
tree30d0338e0d9fac235dc2a2ce799c2585bd31d3d8 /RemoteDaemon
parentafe883918ebf6e29da5f91ce0202d567e02181af (diff)
add readonly mode to serve P2P protocol
This will be used by git-annex-shell when configured to be readonly. This commit was sponsored by Nick Daly on Patreon.
Diffstat (limited to 'RemoteDaemon')
-rw-r--r--RemoteDaemon/Transport/Tor.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/RemoteDaemon/Transport/Tor.hs b/RemoteDaemon/Transport/Tor.hs
index 623ff03e3..133aba1ec 100644
--- a/RemoteDaemon/Transport/Tor.hs
+++ b/RemoteDaemon/Transport/Tor.hs
@@ -128,7 +128,7 @@ serveClient th u r q = bracket setup cleanup start
authed conn theiruuid =
bracket watchChangedRefs (liftIO . maybe noop stopWatchingChangedRefs) $ \crh -> do
v' <- runFullProto (Serving theiruuid crh) conn $
- P2P.serveAuthed u
+ P2P.serveAuthed P2P.ServeReadWrite u
case v' of
Right () -> return ()
Left e -> liftIO $ debugM "remotedaemon" ("Tor connection error: " ++ e)