improve p2p protocol implementation
Tested it in ghci a little now.
This commit is contained in:
parent
74691ddf0e
commit
9cf9ee73f5
3 changed files with 25 additions and 17 deletions
|
@ -46,6 +46,6 @@ server th@(TransportHandle (LocalRepo r) _) = do
|
|||
h <- socketToHandle conn ReadWriteMode
|
||||
hSetBuffering h LineBuffering
|
||||
hSetBinaryMode h False
|
||||
runNetProtoHandle h r (serve u)
|
||||
runNetProtoHandle h h r (serve u)
|
||||
hClose h
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue