Fixed re-initialization of gtk libraries on loading of dumped image (for now only...

[cl-gtk2.git] / glib / gobject.type.lisp

diff --git a/glib/gobject.type.lisp b/glib/gobject.type.lisp
index 12dff51..e863517 100644 (file)
--- a/glib/gobject.type.lisp
+++ b/glib/gobject.type.lisp
@@ -5,7 +5,7 @@
 
 (defcfun (%g-type-init "g_type_init") :void)
 
-(%g-type-init)
+(at-init (%g-type-init))
 
 (defcfun (g-type-name "g_type_name") :string
   (type g-type))