mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

remotedaemon: serve tor hidden service

Browse source
This commit is contained in:
Joey Hess 2016-11-20 15:45:01 -04:00
parent a101b8de37
commit 74691ddf0e
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
8 changed files with 83 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Remote/Helper/P2P/IO.hs
View file

@ -9,7 +9,7 @@
module Remote.Helper.P2P.IO
( RunProto
, runProtoHandle
, runNetProtoHandle
) where
import Remote.Helper.P2P
@ -38,8 +38,8 @@ data S = S
-- Implementation of the protocol, communicating with a peer
-- over a Handle. No Local actions will be run.
runProtoHandle :: MonadIO m => Handle -> Repo -> Proto a -> m a
runProtoHandle h r = go
runNetProtoHandle :: MonadIO m => Handle -> Repo -> Proto a -> m a
runNetProtoHandle h r = go
where
go :: RunProto
go (Pure a) = pure a