Mercurial > emacs
diff lisp/cus-edit.el @ 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 | 9ba6478b7a27 |
| children | 0051d3178111 |
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
