[slime-cvs] CVS slime/contrib

heller heller at common-lisp.net
Thu Apr 17 15:21:51 UTC 2008


Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv24228/contrib

Modified Files:
	ChangeLog swank-fancy-inspector.lisp 
Log Message:
Use slime-read-from-minibuffer instead of slime-read-object.

* swank-fancy-inspector.lisp (inspect-slot-for-emacs):
slime-read-object has been gone for a long time, replaced with
slime-read-from-minibuffer.

--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/04/14 21:31:20	1.105
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/04/17 15:21:51	1.106
@@ -1,3 +1,9 @@
+2008-04-17  Gábor Melis <mega at retes.hu>
+
+	* swank-fancy-inspector.lisp (inspect-slot-for-emacs):
+	slime-read-object has been gone for a long time, replaced with
+	slime-read-from-minibuffer.
+
 2008-04-15  Marco Baringer  <mb at bese.it>
 
 	* slime-indentation.el (cl-indent::line-number): new function.
--- /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2008/03/14 14:39:20	1.14
+++ /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2008/04/17 15:21:51	1.15
@@ -175,7 +175,7 @@
                                 (abort "Abort setting slot ~S" slot-name)
                               (let ((value-string (eval-in-emacs
                                                    `(condition-case c
-                                                     (slime-read-object
+                                                     (slime-read-from-minibuffer
                                                       ,(format nil "Set slot ~S to (evaluated) : " slot-name))
                                                      (quit nil)))))
                                 (when (and value-string




More information about the slime-cvs mailing list