Shell/P2p: fix connection close on read error
This commit is contained in:
parent
4537c8780e
commit
4523a67e7d
@ -248,6 +248,7 @@ module Reader = struct
|
|||||||
| Ok true ->
|
| Ok true ->
|
||||||
worker_loop st
|
worker_loop st
|
||||||
| Ok false ->
|
| Ok false ->
|
||||||
|
Canceler.cancel st.canceler >>= fun () ->
|
||||||
Lwt.return_unit
|
Lwt.return_unit
|
||||||
| Error [Lwt_utils.Canceled | Exn Lwt_pipe.Closed] ->
|
| Error [Lwt_utils.Canceled | Exn Lwt_pipe.Closed] ->
|
||||||
lwt_debug "connection closed to %a"
|
lwt_debug "connection closed to %a"
|
||||||
|
Loading…
Reference in New Issue
Block a user