(accel-signal :string)
(accel-group g-object)
(accel-key :uint)
- (accel-mods gdk-modifier-type)
+ (accel-mods modifier-type)
(accel-flags accel-flags))
(export 'widget-add-accelerator)
(widget g-object)
(accel-group g-object)
(accel-key :uint)
- (accel-mods gdk-modifier-type))
+ (accel-mods modifier-type))
(export 'widget-remove-accelerator)
(export 'widget-get-pango-context)
-(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object gdk::pango-layout)
+(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object gdk::pango-layout :already-referenced)
(widget (g-object widget))
(text :string))