balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Shell: Fix Logging names leak

Browse Source
This commit is contained in:
Pierre Chambart 2018-06-27 01:35:55 +02:00
parent 3dd4d61b71
commit dcc0f7011d
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/lib_shell/distributed_db.ml
View File

@ -457,12 +457,13 @@ module P2p_reader = struct
| chain_db -> | chain_db ->
f chain_db f chain_db
module Handle_msg_Logging =
Logging.Make(struct let name = "node.distributed_db.p2p_reader" end)
let handle_msg global_db state msg = let handle_msg global_db state msg =
let open Message in let open Message in
let module Logging = let open Handle_msg_Logging in
Logging.Make(struct let name = "node.distributed_db.p2p_reader" end) in
let open Logging in
lwt_debug "Read message from %a: %a" lwt_debug "Read message from %a: %a"
P2p_peer.Id.pp_short state.gid Message.pp_json msg >>= fun () -> P2p_peer.Id.pp_short state.gid Message.pp_json msg >>= fun () ->