Info-index-alternatives

Info-index-alternatives

[Juri Linkov]

The message displayed by `Info-index-next' is not informative in
regard to the number of remaining alternatives that subsequent `,'
commands will find.  The patch below displays the number as the total
size of `Info-index-alternatives' minus the currently found index
entry.  Since `Info-index-alternatives' is a ring, if for example
the length of `Info-index-alternatives' is 16, then the message
"(`,' tries to find 15 next)" is correct, because it is true that `,'
will find them regardless of the current position in the ring.

Index: lisp/info.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/info.el,v
retrieving revision 1.451
diff -c -r1.451 info.el
*** lisp/info.el	16 Oct 2005 14:12:03 -0000	1.451
--- lisp/info.el	17 Oct 2005 08:38:45 -0000
***************
*** 2819,2825 ****
  	   (car (car Info-index-alternatives))
  	   (nth 2 (car Info-index-alternatives))
  	   (if (cdr Info-index-alternatives)
! 	       "(`,' tries to find next)"
  	     "(Only match)")))
  
  (defun Info-find-index-name (name)
--- 2825,2832 ----
  	   (car (car Info-index-alternatives))
  	   (nth 2 (car Info-index-alternatives))
  	   (if (cdr Info-index-alternatives)
! 	       (format "(`,' tries to find %s next)"
! 		       (1- (length Info-index-alternatives)))
  	     "(Only match)")))
  
  (defun Info-find-index-name (name)

-- 
Juri Linkov
http://www.jurta.org/emacs/