From: Dmitry Kalyanov Date: Fri, 30 Oct 2009 23:57:04 +0000 (+0300) Subject: glib: Fix typo in GSList foreign type X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=2023a6be06944aaf974f64cf37e14f3aab74daba;p=cl-gtk2.git glib: Fix typo in GSList foreign type --- diff --git a/glib/glib.glist.lisp b/glib/glib.glist.lisp index 82ba209..22ea6bc 100644 --- a/glib/glib.glist.lisp +++ b/glib/glib.glist.lisp @@ -62,6 +62,6 @@ (prog1 (iter (for c initially pointer then (g-slist-next c)) (until (null-pointer-p c)) - (collect (convert-from-foreign (foreign-slot-value c 'g-slist 'data) (glist-type-type type)))) + (collect (convert-from-foreign (foreign-slot-value c 'g-slist 'data) (gslist-type-type type)))) (when (gslist-type-free-from-foreign type) (g-slist-free pointer)))) \ No newline at end of file