From 2023a6be06944aaf974f64cf37e14f3aab74daba Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Sat, 31 Oct 2009 02:57:04 +0300 Subject: [PATCH] glib: Fix typo in GSList foreign type --- glib/glib.glist.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 1.7.10.4