diff --git a/src/proto_alpha/lib_delegate/client_baking_endorsement.ml b/src/proto_alpha/lib_delegate/client_baking_endorsement.ml index 41ad72a00..ab970b0a1 100644 --- a/src/proto_alpha/lib_delegate/client_baking_endorsement.ml +++ b/src/proto_alpha/lib_delegate/client_baking_endorsement.ml @@ -181,7 +181,13 @@ let endorse_for cctxt = function Block_hash.pp_short hash Raw_level.pp level name - Operation_hash.pp_short oph >>= return + Operation_hash.pp_short oph >>= fun () -> + cctxt#message + "Injected endorsement level %a, contract %s '%a'" + Raw_level.pp level + name + Operation_hash.pp_short oph >>= fun () -> + return () let allowed_to_endorse cctxt state (block: Client_baking_blocks.block_info) delegate time = Client_keys.Public_key_hash.name cctxt delegate >>=? fun name ->