Mercurial > hg > xemacs-beta

comparison lisp/info.el @ 414:da8ed4261e83 r21-2-15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-15
author cvs
date Mon, 13 Aug 2007 11:21:38 +0200
parents 697ef44129c6
children 11054d720c21
comparison
equal deleted inserted replaced
413:901169e5ca31 414:da8ed4261e83
2072 (if Info-auto-advance 2072 (if Info-auto-advance
2073 (if (and (pos-visible-in-window-p (point-min)) 2073 (if (and (pos-visible-in-window-p (point-min))
2074 (not (eq Info-auto-advance t)) 2074 (not (eq Info-auto-advance t))
2075 (not (eq last-command this-command))) 2075 (not (eq last-command this-command)))
2076 (message "Hit %s again to go to previous node" 2076 (message "Hit %s again to go to previous node"
2077 (if (= last-command-char 0) 2077 (if (mouse-event-p last-command-event)
2078 "mouse button" 2078 "mouse button"
2079 (key-description (char-to-string last-command-char)))) 2079 (key-description (event-key last-command-event))))
2080 (Info-page-prev) 2080 (Info-page-prev)
2081 (setq this-command 'Info)) 2081 (setq this-command 'Info))
2082 (scroll-down arg))) 2082 (scroll-down arg)))
2083 2083
2084 (defun Info-index (topic) 2084 (defun Info-index (topic)