Mercurial > emacs
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