Remove shape from odocl files

ocaml · Sep 14, 2023 · 152dc16 · 152dc16
1 parent 105c500
commit 152dc16
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/odoc/odoc_link.ml b/src/odoc/odoc_link.ml
@@ -45,5 +45,6 @@ let from_odoc ~resolver ~warnings_options input output =
       link_unit ~resolver ~filename m
       |> handle_warnings ~input_warnings ~warnings_options
       >>= fun (m, warnings) ->
+      let m = {m with Odoc_model.Lang.Compilation_unit.shape = None} in
       Odoc_file.save_unit output ~warnings m;
       Ok (`Module m)