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

Shell/RPC: fix filtering of next_protocols in GET /monitor/heads

Browse Source
This commit is contained in:
Grégoire Henry 2018-07-18 20:20:04 +02:00
parent 378c4e2780
commit f9dd92d6b4
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/lib_shell/monitor_directory.ml
View File

@ -125,7 +125,10 @@ let build_rpc_directory validator mainchain_validator =
else else
Lwt.return_none) Lwt.return_none)
block_stream in block_stream in
let first_call = ref true in in_next_protocols head >>= fun first_block_is_among_next_protocols ->
let first_call =
(* Skip the first block if this is false *)
ref first_block_is_among_next_protocols in
let next () = let next () =
if !first_call then begin if !first_call then begin
first_call := false ; Lwt.return_some (State.Block.hash head, State.Block.header head) first_call := false ; Lwt.return_some (State.Block.hash head, State.Block.header head)