master aebff74af2: Sort completions in Info references/menu correctly

[Lars Ingebrigtsen]

branch: master
commit aebff74af27157b60a0d6549be718d85a809b985
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Sort completions in Info references/menu correctly
    
    * lisp/info.el (Info-follow-reference): Sort completions in the
    order they appear in the buffer (bug#54175).
    (Info-menu-update): Ditto.
---
 lisp/info.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/info.el b/lisp/info.el
index 8ca6c54979..abfb77b055 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -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)