Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Widget.widget_with_error_box ->
Forum_widgets.message_widget ->
Forum_widgets.add_message_widget ->
object
  val ml_class : Html5_types.nmtoken
  method atom_message_list :
    ?number:int -> Forum_types.forum -> Atom_feed.feed Lwt.t
  method display :
    ?rows:int ->
    ?cols:int ->
    ?classes:Html5_types.nmtoken list ->
    forum:Forum_types.forum ->
    first:int64 ->
    number:int64 ->
    ?add_message_form:bool ->
    unit -> [> Html5_types.div ] Eliom_content.Html5.F.elt Lwt.t
  method display_message_list :
    classes:Html5_types.nmtoken list ->
    Html5_types.flow5 Eliom_content.Html5.F.elt
    Eliom_content.Html5.F.list_wrap ->
    [> Html5_types.div ] Eliom_content.Html5.F.elt Lwt.t
  method get_html_from_list :
    Forum_data.raw_message list ->
    [> Html5_types.div ] Eliom_content.Html5.F.elt list list Lwt.t
  method get_message_list :
    forum:Forum_types.forum ->
    first:int64 -> number:int64 -> Forum_data.raw_message list Lwt.t
  method pretty_print_message_list :
    forum:Forum_types.forum ->
    ?rows:int ->
    ?cols:int ->
    classes:Html5_types.nmtoken list ->
    add_message_form:bool ->
    Forum_data.raw_message list ->
    (Html5_types.nmtoken list *
     Html5_types.flow5_without_header_footer Eliom_content.Html5.F.elt list)
    Lwt.t
end