X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcontent_pres%2FboxPp.ml;h=657f8a9d334d37b062eaf5fc57bf325dbc51af15;hb=7d7f729471b4d5ebafa1b915096974e726cc13c6;hp=ddb9d3b82af51960b832880e0ee90406181a92d2;hpb=9a0e4f3be9f70662f18d2d3b6dd60ae79fba565b;p=helm.git diff --git a/helm/ocaml/content_pres/boxPp.ml b/helm/ocaml/content_pres/boxPp.ml index ddb9d3b82..657f8a9d3 100644 --- a/helm/ocaml/content_pres/boxPp.ml +++ b/helm/ocaml/content_pres/boxPp.ml @@ -130,7 +130,7 @@ let render_to_strings size markup = let tl_renderings = List.map (fun f -> - let indent_header = if indent then string_indent else "" in +(* let indent_header = if indent then string_indent else "" in *) snd (indent_children (f children_size))) tl_fs in