Mercurial > emacs

comparison lisp/info.el @ 107349:577361495f7d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
from trunk
author Kenichi Handa <handa@m17n.org>
date Wed, 03 Mar 2010 15:04:00 +0900
parents f220632d1439
children ef2a56409ad3
comparison
equal deleted inserted replaced
107318:72a86cbe50bc 107349:577361495f7d
3060 (nconc (cdr Info-index-alternatives) 3060 (nconc (cdr Info-index-alternatives)
3061 (list (car Info-index-alternatives))) 3061 (list (car Info-index-alternatives)))
3062 num (1- num))) 3062 num (1- num)))
3063 (Info-goto-node (nth 1 (car Info-index-alternatives))) 3063 (Info-goto-node (nth 1 (car Info-index-alternatives)))
3064 (if (> (nth 3 (car Info-index-alternatives)) 0) 3064 (if (> (nth 3 (car Info-index-alternatives)) 0)
3065 (forward-line (1- (nth 3 (car Info-index-alternatives)))) 3065 (forward-line (- (nth 3 (car Info-index-alternatives)) 2))
3066 (forward-line 3) ; don't search in headers 3066 (forward-line 3) ; don't search in headers
3067 (let ((name (car (car Info-index-alternatives)))) 3067 (let ((name (car (car Info-index-alternatives))))
3068 (Info-find-index-name name))) 3068 (Info-find-index-name name)))
3069 (message "Found `%s' in %s. %s" 3069 (message "Found `%s' in %s. %s"
3070 (car (car Info-index-alternatives)) 3070 (car (car Info-index-alternatives))