diff --git a/lisp/info.el b/lisp/info.el
index 8810bc7a83c..fb47cb4d188 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2775,6 +2775,8 @@ Because of ambiguities, this should be concatenated with something like
               ;; Go back to the start node (for the next completion).
               (unless (equal Info-current-node orignode)
                 (Info-goto-node orignode))
+              ;; Sort list alphabetically.
+              (setq completions (nreverse completions))
               ;; Update the cache.
               (setq Info-complete-cache
 		   (list Info-current-file Info-current-node