let s_len = String.length s in
(fun _ -> s_len, [s])
-let render_to_strings ?(map_unicode_to_tex = true) choose_action size markup =
+let render_to_strings ~map_unicode_to_tex choose_action size markup =
let max_size = max_int in
let rec aux_box =
function
else
match Utf8Macro.tex_of_unicode s with
| Some s -> s ^ " "
- | None -> s
+ | None -> " " ^ s ^ " "
end else
s
in
in
snd (aux_mpres markup size)
-let render_to_string ?map_unicode_to_tex choose_action size markup =
+let render_to_string ~map_unicode_to_tex choose_action size markup =
String.concat "\n"
- (render_to_strings ?map_unicode_to_tex choose_action size markup)
+ (render_to_strings ~map_unicode_to_tex choose_action size markup)