]
type html_msg = [ `Error of html_tag | `Msg of html_tag ]
+ (** html_msg to plain text converter *)
val string_of_html_msg: html_msg -> string
+
+ (** html_tag to plain text converter *)
+val string_of_html_tag: html_tag -> string
+
+ (** html_msg to html text converter *)
val html_of_html_msg: html_msg -> string
+ (** html_tag to html text converter *)
+val html_of_html_tag: html_tag -> string
+
type logger_fun = ?append_NL:bool -> html_msg -> unit
val register_log_callback: logger_fun -> unit