X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.widget.lisp;h=efffbf6ffaf4066cfb058dd2f11c2e5385cb6bed;hb=89b8d7f826c33afc4f8b14a0c7f284c975551dec;hp=a1f25c8169d4a39ea6fda377f55a6b8d14e727aa;hpb=7f492b85a1e45dc9218b8281b63156c96759158a;p=cl-gtk2.git diff --git a/gtk/gtk.widget.lisp b/gtk/gtk.widget.lisp index a1f25c8..efffbf6 100644 --- a/gtk/gtk.widget.lisp +++ b/gtk/gtk.widget.lisp @@ -388,12 +388,7 @@ (export 'widget-create-pango-context) -(defcfun (widget-get-pango-context "gtk_widget_get_pango_context") g-object - (widget g-object)) - -(export 'widget-get-pango-context) - -(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object gdk::pango-layout :already-referenced) +(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object pango-layout :already-referenced) (widget (g-object widget)) (text :string))