sig
val displayof : 'a Widget.widget -> Widget.any Widget.widget
val follows_mouse : unit -> unit
val force : 'a Widget.widget -> unit
val get : ?displayof:'a Widget.widget -> unit -> Widget.any Widget.widget
val lastfor : 'a Widget.widget -> Widget.any Widget.widget
val next : 'a Widget.widget -> Widget.any Widget.widget
val prev : 'a Widget.widget -> Widget.any Widget.widget
val set : 'a Widget.widget -> unit
end