[slime-cvs] CVS slime/contrib

CVS User sboukarev sboukarev at common-lisp.net
Sun Mar 7 17:04:00 UTC 2010


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

Modified Files:
	ChangeLog swank-fancy-inspector.lisp 
Log Message:
* contrib/swank-fancy-inspector.lisp (stable-sort-by-inheritance): Remove copy-seq,
unnecessarily put in the previous commit.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/03/07 14:28:55	1.350
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/03/07 17:04:00	1.351
@@ -1,5 +1,10 @@
 2010-03-07  Stas Boukarev  <stassats at gmail.com>
 
+	* swank-fancy-inspector.lisp (stable-sort-by-inheritance): Remove copy-seq,
+	unnecessarily put in the previous commit.
+
+2010-03-07  Stas Boukarev  <stassats at gmail.com>
+
 	* swank-fancy-inspector.lisp: Add buttons
 	for selecting default sorting order and default grouping method of
 	slots of a class.
--- /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2010/03/07 14:28:55	1.23
+++ /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2010/03/07 17:04:00	1.24
@@ -373,8 +373,7 @@
                        class))))
 
 (defun stable-sort-by-inheritance (slots class)
-  (stable-sort (copy-seq slots)
-               #'string< 
+  (stable-sort slots #'string< 
                :key #'(lambda (s)
                         (class-name (slot-home-class-using-class s class)))))
 





More information about the slime-cvs mailing list