size_col : int64 GTree.column;
date_col : string GTree.column;
link_col : string GTree.column;
- mutable status : (string -> unit) option;
}
and hdata = state_t * content_t
and content_t =
| Loading
| ErrorMessage of string
+ | Info of string
| Top of Slave.source
| Directory of Slave.direntry
| File of Slave.direntry
val get_hdata : t -> Gtk.tree_iter -> hdata
(* Store/retrieve hdata structure in a model row. *)
+val find_child_node_by_hdata : t -> Gtk.tree_iter -> hdata -> Gtk.tree_iter
+ (* [find_child_node_by_hdata t row hdata] searches the direct children
+ of [row] looking for one which exactly matches [hdata] and returns
+ that child. If no child found, raises [Not_found]. *)
+
val get_pathname : t -> Gtk.tree_iter -> Slave.source * string
(* Get the full path to a row by chasing up through the tree to the
top. This also returns the source (eg. operating system or single
volume). *)
-
-val update_status : t -> string -> unit
- (* Update the status bar. *)