projects
/
cl-gtk2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
222fb22
)
Fix issuing warning in gobject metaclass if gtype is not available
author
Dmitry Kalyanov
<Kalyanov.Dmitry@gmail.com>
Tue, 9 Feb 2010 22:10:32 +0000
(
01:10
+0300)
committer
Dmitry Kalyanov
<Kalyanov.Dmitry@gmail.com>
Tue, 9 Feb 2010 22:10:32 +0000
(
01:10
+0300)
glib/gobject.meta.lisp
patch
|
blob
|
history
diff --git
a/glib/gobject.meta.lisp
b/glib/gobject.meta.lisp
index
adcb9d8
..
120a958
100644
(file)
--- a/
glib/gobject.meta.lisp
+++ b/
glib/gobject.meta.lisp
@@
-33,7
+33,7
@@
(gobject-class-direct-g-type-name class)
(class-name class)
(gtype-name type))))))
- (unless (gtype (gobject-class-direct-g-type-name class))
+ (when (zerop (gtype-id (gtype (gobject-class-direct-g-type-name class))))
(warn "Declared GType name '~A' for class '~A' is invalid (g_type_name returned 0)"
(gobject-class-direct-g-type-name class) (class-name class)))))