changeset 70973:4477a2e46659

(Info-index-next): Use where-is-internal to report actual binding of Info-index-next, rather than hard-coded `,'.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 26 May 2006 20:09:58 +0000
parents 3ffa2f66a303
children 3c0830331524
files lisp/info.el
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Fri May 26 20:01:16 2006 +0000
+++ b/lisp/info.el	Fri May 26 20:09:58 2006 +0000
@@ -2866,8 +2866,11 @@
 	   (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)