perf(Learnocaml_main): Remove unneeded Markup.pretty_print

ocaml-sf · Oct 3, 2021 · e5ce820 · e5ce820
1 parent fe0fe8b
commit e5ce820
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/main/learnocaml_main.ml b/src/main/learnocaml_main.ml
@@ -270,7 +270,6 @@ let process_html_file orig_file dest_file base_url no_secret =
               when no_secret && List.mem (("", "id"), "secret-section") attrs ->
             `Start_element ((e, "div"), (("", "style"), "display:none")::attrs)
          | t -> t)
-  |> Markup.pretty_print
   |> Markup.write_html
   |> Markup_lwt.to_lwt_stream
   |> Lwt_io.write_chars wfile >>= fun () ->