(lisp-complete-symbol): Sort the list.

This commit is contained in:
Richard M. Stallman 1996-11-01 08:19:07 +00:00
parent 23b6422580
commit 030dccec3e

View file

@ -299,6 +299,7 @@ function definitions, values or properties are considered."
(goto-char (max (point-min) (- (point) 4)))
(looking-at " <f>"))
(forward-char -4))))))
(setq list (sort list 'string<))
(or (eq predicate 'fboundp)
(let (new)
(while list