Baker: fix inconsistency in logging

2018-11-26 18:39:48 +01:00 · 2018-11-26 18:39:48 +01:00 · c13a7135f8
commit c13a7135f8
parent 030916ed11
1 changed files with 1 additions and 1 deletions
--- a/src/proto_alpha/lib_delegate/client_baking_forge.ml
+++ b/src/proto_alpha/lib_delegate/client_baking_forge.ml
@ -661,7 +661,7 @@ let forge_block

  (* Now for some logging *)
  let total_op_count = List.length operations_arg in
-  let valid_op_count = List.length operations in
+  let valid_op_count = List.length (List.concat operations) in
  lwt_log_info Tag.DSL.(fun f ->
      f "Found %d valid operations (%d refused) for timestamp %a@.Computed fitness %a"
      -% t event "found_valid_operations"