[slime-cvs] CVS update: slime/swank.lisp slime/ChangeLog

[Luke Gorrie]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv30593

Modified Files:
	swank.lisp ChangeLog 
Log Message:
Now sorting completions on symbol-name instead of
`present-symbol-before-p'

Date: Tue Oct 21 06:59:04 2003
Author: lgorrie

Index: slime/swank.lisp
diff -u slime/swank.lisp:1.42 slime/swank.lisp:1.43
--- slime/swank.lisp:1.42	Tue Oct 21 06:47:40 2003
+++ slime/swank.lisp	Tue Oct 21 06:59:04 2003
@@ -343,8 +343,8 @@
                         (t (format nil "~A" s))))
                 ;; DO-SYMBOLS can consider the same symbol more than
                 ;; once, so remove duplicates.
-                (remove-duplicates (sort completions
-                                         #'present-symbol-before-p)))))))
+                (remove-duplicates (sort completions #'string<
+                                         :key #'symbol-name)))))))
 
 (defun parse-symbol-designator (string)
   "Parse STRING as a symbol designator.


Index: slime/ChangeLog
diff -u slime/ChangeLog:1.54 slime/ChangeLog:1.55
--- slime/ChangeLog:1.54	Tue Oct 21 06:48:59 2003
+++ slime/ChangeLog	Tue Oct 21 06:59:04 2003
@@ -2,8 +2,8 @@
 
 	* swank.lisp (completions): Fixed semantics: should now consider
 	only/all completions that would not cause a read-error due to
-	symbol visibility. Also avoiding duplicates, and sorting the
-	results as with apropos.
+	symbol visibility. Also avoiding duplicates and sorting on
+	symbol-name.
 
 2003-10-20  Luke Gorrie  <luke at bluetail.com>