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

Class Forum_widgets.thread_widget

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
val comment_class : Html5_types.nmtoken
val comment_button_class : Html5_types.nmtoken
val main_msg_class : Html5_types.nmtoken
val comments_class : 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
method display_comment_line : 
?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