Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 01:34:21 +00:00
Code Issues Projects Releases Packages Wiki Activity

Sort completions in Info references/menu correctly

Browse source 
* lisp/info.el (Info-follow-reference): Sort completions in the
order they appear in the buffer (bug#54175).
(Info-menu-update): Ditto.
This commit is contained in:
Lars Ingebrigtsen 2022-05-05 13:30:14 +02:00
parent 8364f058b8
commit aebff74af2
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/info.el
View file

@ -2599,7 +2599,8 @@ new buffer."
(if (eq alt-default t) (setq alt-default str))
;; Don't add this string if it's a duplicate.
(or (assoc-string str completions t)
(push str completions))))
(push str completions)))
(setq completions (nreverse completions)))
;; If no good default was found, try an alternate.
(or default
(setq default alt-default))
@ -4285,7 +4286,8 @@ If FORK is non-nil, it is passed to `Info-goto-node'."
(substring str (match-end 0))))
(setq i (1+ i)))
(setq items
(cons str items))))
(cons str items)))
(setq items (nreverse items)))
(while (and items (< number 9))
(setq current (car items)
items (cdr items)