X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=glib%2Fglib.glist.lisp;h=22ea6bcff430308afa772a5d7429f8227d30e08c;hb=b1f828da8293207e141311c3ce04321ff4fe9573;hp=82ba209d59c4a927cba19eba27bd0d21eb4b2b81;hpb=0d03b82a77743d2ea5ef69bea08735fa12857d92;p=cl-gtk2.git

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