sig
  val font_name : ([> `fontselection ], string) Gobject.property
  val preview_text : ([> `fontselection ], string) Gobject.property
end