* or send an email to <lpadovan@cs.unibo.it>
*)
-let create ~dictionary ~mml ~tml ~log =
- I_mathml_editor.create dictionary#as_Document mml#as_Document tml#as_Document log
+let default_dictionary_path = I_mathml_editor.get_default_dictionary_path ()
+;;
+
+let default_mathml_stylesheet_path = I_mathml_editor.get_default_mathml_stylesheet_path ()
+;;
+
+let default_tex_stylesheet_path = I_mathml_editor.get_default_tex_stylesheet_path ()
+;;
+
+let create ~dictionary_uri ~mml_uri ~tml_uri ~log =
+ I_mathml_editor.create dictionary_uri mml_uri tml_uri log
;;
let freeze = I_mathml_editor.freeze