diff --git a/src/plugins/markdown-report/md_gen.ml b/src/plugins/markdown-report/md_gen.ml index a29009b11cad4b55de5779661e956919d7350cfe..3ddf29b5c5bec5d12ca22fe62dae3cf492a28d63 100644 --- a/src/plugins/markdown-report/md_gen.ml +++ b/src/plugins/markdown-report/md_gen.ml @@ -370,8 +370,9 @@ let section_event is_err env nb event = insert_marks env lab else insert_remark env lab in + let pp_warning fmt msg = Format.fprintf fmt "Message: %s" msg in H2 (plain title, Some lab) - :: Block [ Text (plain "message text is"); Text (plain event.evt_message) ] + :: Block (codeblock "log" pp_warning event.evt_message) :: content let make_events_list is_err env l =