ocaml/otherlibs/labltk/builtin/selection_handle_set.mli

val handle_set :
    command: (pos:int -> len:int -> string) -> 
    ?format: string -> ?selection:string -> ?type: string -> 'a widget -> unit
(* tk invocation: selection handle <icccm list> <widget> <command> *)