sig
  val activate : ([> `gtkstatusicon ], unit -> unit) GtkSignal.t
  val popup_menu : ([> `gtkstatusicon ], int -> int -> unit) GtkSignal.t
  val size_changed : ([> `gtkstatusicon ], int -> unit) GtkSignal.t
end