X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.cell-layout.lisp;h=71b936ba15cecf7deee1c1d705a25c27e8671a07;hb=c36dad68c5724171792b032fe56d6d531fc2571a;hp=1cdef1dacae5f8eb7e214118a673f12124f77d87;hpb=51aa0c04d9522fa9c17555cc779036aa9703ef02;p=cl-gtk2.git

diff --git a/gtk/gtk.cell-layout.lisp b/gtk/gtk.cell-layout.lisp
index 1cdef1d..71b936b 100644
--- a/gtk/gtk.cell-layout.lisp
+++ b/gtk/gtk.cell-layout.lisp
@@ -48,7 +48,7 @@
 (export 'cell-layout-add-attribute)
 
 (defcallback gtk-cell-layout-cell-data-func-callback :void
-    ((cell-layout g-object) (cell g-object) (tree-model g-object) (iter (g-boxed-ref tree-iter)) (data :pointer))
+    ((cell-layout g-object) (cell g-object) (tree-model g-object) (iter (g-boxed-foreign tree-iter)) (data :pointer))
   (restart-case
       (funcall (get-stable-pointer-value data)
                cell-layout cell tree-model iter)