[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv3731

Modified Files:
	ChangeLog swank-fancy-inspector.lisp 
Log Message:
* swank-fancy-inspector.lisp (emacs-inspect): Add [finalize]
button for not finalized classes.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/05/28 19:13:17	1.388
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/05/29 05:40:18	1.389
@@ -1,3 +1,8 @@
+2010-05-29  Stas Boukarev  <stassats at gmail.com>
+
+	* swank-fancy-inspector.lisp (emacs-inspect): Add [finalize]
+	button for not finalized classes.
+
 2010-05-28  Helmut Eller  <heller at common-lisp.net>
 
 	Call provide at the end of the file.
--- /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2010/05/14 03:20:04	1.27
+++ /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2010/05/29 05:40:18	1.28
@@ -450,7 +450,9 @@
                    (lambda (slot)
                      `(:value ,slot ,(inspector-princ
                                       (swank-mop:slot-definition-name slot)))))
-                  '("#<N/A (class not finalized)>"))
+                  `("#<N/A (class not finalized)> "
+                    (:action "[finalize]"
+                             ,(lambda () (swank-mop:finalize-inheritance class)))))
             (:newline)
             ,@(let ((doc (documentation class t)))
                 (when doc