object val virtual obj : [> `fontselection ] Gobject.obj method font_name : string method preview_text : string method set_font_name : string -> unit method set_preview_text : string -> unit end