object val virtual obj : [> `filechooserbutton ] Gobject.obj method set_title : string -> unit method set_width_chars : int -> unit method title : string method width_chars : int end