changeset 28568:cfff869d8a3d

(custom-sort-items): Avoid symbol-name with new string-lessp.
author Dave Love <fx@gnu.org>
date Thu, 13 Apr 2000 19:05:10 +0000
parents 3ed20cb4c9b3
children e2b3c1885fb1
files lisp/cus-edit.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Thu Apr 13 19:04:33 2000 +0000
+++ b/lisp/cus-edit.el	Thu Apr 13 19:05:10 2000 +0000
@@ -609,7 +609,7 @@
   (sort (copy-sequence items)
    (lambda (a b)
      (let ((typea (nth 1 a)) (typeb (nth 1 b))
-	   (namea (symbol-name (nth 0 a))) (nameb (symbol-name (nth 0 b))))
+	   (namea (nth 0 a)) (nameb (nth 0 b)))
        (cond ((not order-groups)
 	      ;; Since we don't care about A and B order, maybe sort.
 	      (when sort-alphabetically