# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 955652710 0
# Node ID cfff869d8a3d697a137679deebf53f9292e84f10
# Parent  3ed20cb4c9b38dbe0b9436632d2afb074395f317
(custom-sort-items): Avoid symbol-name with new
string-lessp.

diff -r 3ed20cb4c9b3 -r cfff869d8a3d lisp/cus-edit.el
--- 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