ojs_filetree 0.7.0 · OCaml Package

val mutable filetree : tree_node list

val mutable on_deselect : 'a -> Ojs_filetree.Types.path -> unit

val mutable on_select : 'a ->
  [ `Dir | `File of Ojs_filetree.Types.mime_type ] ->
  Ojs_filetree.Types.path ->
  unit

val mutable selected : (Ojs_js.id * Ojs_filetree.Types.path) option

val mutable show_files : bool

method add_dir : Ojs_filetree.Types.path -> string -> unit Lwt.t

method add_file : [ `Dir | `File ] ->
  Ojs_filetree.Types.path ->
  Js_of_ocaml.File.file Js_of_ocaml.Js.t ->
  unit

method build_from_tree : Ojs_filetree.Types.file_tree list -> unit

method compare_tn : tree_node -> tree_node -> int

method delete : Ojs_filetree.Types.path -> unit Lwt.t

method display_error : string -> unit

method handle_add_dir : Ojs_filetree.Types.path -> unit

method handle_add_file : Ojs_filetree.Types.path ->
  Ojs_filetree.Types.mime_type ->
  unit

method handle_delete : Ojs_filetree.Types.path -> unit

method handle_drag_drop : [ `Dir | `File ] ->
  Ojs_filetree.Types.path ->
  Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t ->
  unit

method handle_message : P.server_msg -> bool Js_of_ocaml.Js.t

method id : Ojs_js.SMap.key

method insert_dir : Ojs_filetree.Types.path -> unit

method insert_file : Ojs_filetree.Types.path ->
  Ojs_filetree.Types.mime_type ->
  unit

method insert_tn : Ojs_js.id ->
  tree_node ->
  Js_of_ocaml.Dom.node Js_of_ocaml.Js.t ->
  tree_node list ->
  tree_node list

method msg_id : string

method on_deselect : 'a -> Ojs_filetree.Types.path -> unit

method on_select : 'a ->
  [ `Dir | `File of Ojs_filetree.Types.mime_type ] ->
  Ojs_filetree.Types.path ->
  unit

method prompt_add_dir : Ojs_filetree.Types.path -> unit Lwt.t

method prompt_delete : Ojs_filetree.Types.path -> unit Lwt.t

method set_on_deselect : ('a -> Ojs_filetree.Types.path -> unit) -> unit

method set_on_select : ('a ->
                         [ `Dir | `File of Ojs_filetree.Types.mime_type ] ->
                         Ojs_filetree.Types.path ->
                         unit) ->
  unit

method set_onclick : Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t ->
  Ojs_js.SMap.key ->
  [ `Dir | `File of Ojs_filetree.Types.mime_type ] ->
  Ojs_filetree.Types.path ->
  unit

method set_selected : Ojs_js.SMap.key ->
  [ `Dir | `File of Ojs_filetree.Types.mime_type ] ->
  Ojs_filetree.Types.path ->
  unit

method set_show_files : bool -> unit

method set_unselected : Ojs_js.SMap.key -> Ojs_filetree.Types.path -> unit

method simple_call : P.client_msg -> unit Lwt.t

method tree_node_by_path : Ojs_filetree.Types.path -> tree_node

method update_tree : unit Lwt.t

package ojs_filetree