diff --git a/src/Fmt_odoc.ml b/src/Fmt_odoc.ml index 3d5f047407..fd405b2554 100644 --- a/src/Fmt_odoc.ml +++ b/src/Fmt_odoc.ml @@ -145,7 +145,7 @@ let rec fmt_inline_element : inline_element -> Fmt.t = function escape $ str_normalized w | `Code_span s -> let s = escape_brackets s in - hovbox 0 (wrap "[" "]" (str s)) + hovbox 0 (wrap "[" "]" (str_normalized s)) | `Raw_markup (lang, s) -> let lang = match lang with diff --git a/test/passing/doc_comments.mli.ref b/test/passing/doc_comments.mli.ref index 5290ba80e2..22217d754f 100644 --- a/test/passing/doc_comments.mli.ref +++ b/test/passing/doc_comments.mli.ref @@ -330,9 +330,9 @@ end (** {%html:
Raw markup
%} {%Without language%} {%other:Other language%} *) -(** [Multi - Line] +(** [Multi Line] - [ A lot of spaces ] + [A lot of spaces] - [Very looooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooong] *) + [Very + looooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooong] *)