From: Dmitry Kalyanov <Kalyanov.Dmitry@gmail.com>
Date: Sun, 6 Sep 2009 10:16:58 +0000 (+0400)
Subject: Set *debug-subclass* at mm-test
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=b1f9aa6ad65e83f4ac4c2b8c3758ff82e1920e5b;p=cl-gtk2.git

Set *debug-subclass* at mm-test
---

diff --git a/mm-test.lisp b/mm-test.lisp
index 9d44ef1..e76ae5d 100644
--- a/mm-test.lisp
+++ b/mm-test.lisp
@@ -61,7 +61,8 @@
 ")))
 
 (setf gobject::*debug-stream* *standard-output*
-      gobject::*debug-gc* t)
+      gobject::*debug-gc* t
+      gobject::*debug-subclass* t)
 
 (defclass my-button (gtk:button) () (:metaclass gobject-class))