object val virtual obj : [> `linkbutton ] Gobject.obj method set_uri : string -> unit method uri : string end