class thread_widget :
Widget.widget_with_error_box -> message_widget ->
add_message_widget -> 'a -> object..end
val thr_class : Html5_types.nmtoken
val thr_msg_class : string
: Html5_types.nmtoken
: Html5_types.nmtoken
val main_msg_class : Html5_types.nmtoken
: Html5_types.nmtoken
method get_thread :
message_id:Forum_types.message -> Forum_types.message_info list Lwt.t
method display_thread :
'b.
classes:Html5_types.nmtoken list ->
Html5_types.flow5 Eliom_content.Html5.F.elt list *
Html5_types.flow5 Eliom_content.Html5.F.elt
Eliom_content.Html5.F.list_wrap ->
([> Html5_types.div ] as 'b) Eliom_content.Html5.F.elt Lwt.t
method display_thread_splitted :
classes:Html5_types.nmtoken list ->
Html5_types.flow5 Eliom_content.Html5.F.elt list *
Html5_types.flow5 Eliom_content.Html5.F.elt
Eliom_content.Html5.F.list_wrap ->
(Html5_types.div Eliom_content.Html5.F.elt *
Html5_types.div Eliom_content.Html5.F.elt)
Lwt.t
:
?level:int ->
role:Forum.role ->
?rows:int ->
?cols:int ->
Forum_types.message_info ->
Html5_types.flow5 Eliom_content.Html5.F.elt list Lwt.t
method pretty_print_thread :
classes:string list ->
commentable:bool ->
?rows:int ->
?cols:int ->
Forum_types.message_info list ->
(Html5_types.nmtoken list *
(Html5_types.flow5 Eliom_content.Html5.F.elt list *
Html5_types.flow5 Eliom_content.Html5.F.elt
Eliom_content.Html5.F.list_wrap))
Lwt.t
method display :
'c.
?commentable:bool ->
?rows:int ->
?cols:int ->
?classes:string list ->
data:Forum_types.message ->
unit -> ([> Html5_types.div ] as 'c) Eliom_content.Html5.F.elt Lwt.t
method display_splitted :
?commentable:bool ->
?rows:int ->
?cols:int ->
?classes:string list ->
data:Forum_types.message ->
unit ->
(Html5_types.div Eliom_content.Html5.F.elt *
Html5_types.div Eliom_content.Html5.F.elt)
Lwt.t