`sig
val cast : 'a Gobject.obj -> Gtk.font_button Gtk.obj
module P :
sig
val font_name : ([> `fontbutton ], string) Gobject.property
val show_size : ([> `fontbutton ], bool) Gobject.property
val show_style : ([> `fontbutton ], bool) Gobject.property
val title : ([> `fontbutton ], string) Gobject.property
val use_font : ([> `fontbutton ], bool) Gobject.property
val use_size : ([> `fontbutton ], bool) Gobject.property
end
module S :
sig val font_set : ([> `fontbutton ], unit -> unit) GtkSignal.t end
val create : Gtk.font_button Gobject.param list -> Gtk.font_button Gtk.obj
val make_params :
cont:(([> `fontbutton ] as 'a) Gobject.param list -> 'b) ->
'a Gobject.param list -> ?font_name:string -> ?title:string -> 'b
end`