X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=glib%2Fgobject.foreign-closures.lisp;h=1f87c70f2a9ac236fb7d5440d42e0534f8b93f51;hb=cff61d816a0776142d2c3c3b6fbc2841bafe06c9;hp=da0e7313fcee81d8ab0be51439c1cfdd3e53229e;hpb=75fc4480424d0b11025df2b52ddb4cc3f45f5def;p=cl-gtk2.git

diff --git a/glib/gobject.foreign-closures.lisp b/glib/gobject.foreign-closures.lisp
index da0e731..1f87c70 100644
--- a/glib/gobject.foreign-closures.lisp
+++ b/glib/gobject.foreign-closures.lisp
@@ -28,7 +28,7 @@
          (fn (get-stable-pointer-value function-id))
          (fn-result (call-with-restarts fn args)))
     (when return-type
-      (set-g-value return-value fn-result return-type))))
+      (set-g-value return-value fn-result return-type :g-value-init nil))))
 
 (defun parse-closure-arguments (count-of-args args)
   (loop