+(export 'widget-modify-base)
+
+;void gtk_widget_modify_font (GtkWidget *widget,
+; PangoFontDescription *font_desc);
+
+(defcfun (widget-modify-cursor "gtk_widget_modify_cursor") :void
+ (widget (g-object widget))
+ (primary (g-boxed-foreign color))
+ (secondary (g-boxed-foreign color)))
+
+(export 'widget-modify-cursor)
+
+(defcfun (widget-create-pango-context "gtk_widget_create_pango_context") (g-object :already-referenced)