X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=glib%2Fgobject.object-defs.lisp;h=785e194f3b9bac5005511948ae5190159f32f3ea;hb=b335487329c39b04d1ee9a45123eb1eb68889905;hp=c14737123a651b322352dd46c38d2c23ca7646f9;hpb=0ae2966882842ac995de2ddd4c5da3138e2283ce;p=cl-gtk2.git

diff --git a/glib/gobject.object-defs.lisp b/glib/gobject.object-defs.lisp
index c147371..785e194 100644
--- a/glib/gobject.object-defs.lisp
+++ b/glib/gobject.object-defs.lisp
@@ -1,3 +1,7 @@
 (in-package :gobject)
 
-(define-g-object-class "GInitiallyUnowned" g-initially-unowned (:superclass g-object) ())
\ No newline at end of file
+(defclass g-initially-unowned (g-object)
+  ()
+  (:metaclass gobject-class)
+  (:g-type-name . "GInitiallyUnowned")
+  (:documentation "Base class that has initial \"floating\" reference."))