(Info-index-next): Use where-is-internal to report actual binding of

Info-index-next, rather than hard-coded `,'.

1 files changed, 5 insertions, 2 deletions

diff --git a/lisp/info.el b/lisp/info.el
index 2737999b090..2669b709316 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2866,8 +2866,11 @@ Give an empty topic name to go to the Index node itself."
            (car (car Info-index-alternatives))
            (nth 2 (car Info-index-alternatives))
            (if (cdr Info-index-alternatives)
-               (format "(%s total; use `,' for next)"
-                       (length Info-index-alternatives))
+               (format "(%s total; use `%s' for next)"
+                       (length Info-index-alternatives)
+                       (key-description (where-is-internal
+                                         'Info-index-next overriding-local-map
+                                         t)))
              "(Only match)")))
 
 (defun Info-find-index-name (name)