Mercurial > hg > xemacs-beta

comparison lisp/info.el @ 347:7c94d56991e1 r21-1-3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-3
author cvs
date Mon, 13 Aug 2007 10:53:48 +0200
parents 54f7aa390f4f
children 4711e16a8e49
comparison
equal deleted inserted replaced
346:dd0986ffd2cf 347:7c94d56991e1
2067 (if Info-auto-advance 2067 (if Info-auto-advance
2068 (if (and (pos-visible-in-window-p (point-min)) 2068 (if (and (pos-visible-in-window-p (point-min))
2069 (not (eq Info-auto-advance t)) 2069 (not (eq Info-auto-advance t))
2070 (not (eq last-command this-command))) 2070 (not (eq last-command this-command)))
2071 (message "Hit %s again to go to previous node" 2071 (message "Hit %s again to go to previous node"
2072 (if (= last-command-char 0) 2072 (if (mouse-event-p last-command-event)
2073 "mouse button" 2073 "mouse button"
2074 (key-description (char-to-string last-command-char)))) 2074 (key-description (event-key last-command-event))))
2075 (Info-page-prev) 2075 (Info-page-prev)
2076 (setq this-command 'Info)) 2076 (setq this-command 'Info))
2077 (scroll-down arg))) 2077 (scroll-down arg)))
2078 2078
2079 (defun Info-index (topic) 2079 (defun Info-index (topic)