X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=glib%2Fgobject.type-info.object.lisp;h=94f95f12a110065ad2a37b901b341799af4bb213;hb=c36dad68c5724171792b032fe56d6d531fc2571a;hp=27b7db06ab79370b3ed05085733c768de0433f16;hpb=174477fdd5bd8bef8601ed1ad7076db4c4f3f81e;p=cl-gtk2.git

diff --git a/glib/gobject.type-info.object.lisp b/glib/gobject.type-info.object.lisp
index 27b7db0..94f95f1 100644
--- a/glib/gobject.type-info.object.lisp
+++ b/glib/gobject.type-info.object.lisp
@@ -28,7 +28,7 @@ See accessor functions:
       (print-unreadable-object (instance stream)
         (format stream
                 "PROPERTY ~A ~A.~A (flags:~@[~* readable~]~@[~* writable~]~@[~* constructor~]~@[~* constructor-only~])"
-                (g-class-property-definition-type instance)
+                (gtype-name (g-class-property-definition-type instance))
                 (g-class-property-definition-owner-type instance)
                 (g-class-property-definition-name instance)
                 (g-class-property-definition-readable instance)