l4/pkg/ocaml/contrib/otherlibs/labltk/builtin/selection_own_set.mli

   1 ##ifdef CAMLTK
   2
   3 val own_set : icccm list -> widget -> unit
   4 (** tk invocation: selection own <icccm list> <widget> *)
   5
   6 ##else
   7
   8 val own_set :
   9     ?command:(unit->unit) -> ?selection:string -> 'a widget -> unit
  10 (** tk invocation: selection own <icccm list> <widget> *)
  11
  12 ##endif