Mercurial > emacs

comparison lisp/help-macro.el @ 21120:116fb3c03737

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(make-help-screen): Mention DEL in the prompt.
author Richard M. Stallman <rms@gnu.org>
date Mon, 09 Mar 1998 05:26:05 +0000
parents 857e1ce3f14b
children 8e860ff326de
comparison
equal deleted inserted replaced
21119:7d8bbe35875e 21120:116fb3c03737
151 (overriding-local-map local-map)) 151 (overriding-local-map local-map))
152 (setq key (read-key-sequence 152 (setq key (read-key-sequence
153 (format "Type one of the options listed%s: " 153 (format "Type one of the options listed%s: "
154 (if (pos-visible-in-window-p 154 (if (pos-visible-in-window-p
155 (point-max)) 155 (point-max))
156 "" " or Space to scroll"))) 156 "" ", or SPACE or DEL to scroll")))
157 char (aref key 0))) 157 char (aref key 0)))
158 158
159 ;; If this is a scroll bar command, just run it. 159 ;; If this is a scroll bar command, just run it.
160 (when (eq char 'vertical-scroll-bar) 160 (when (eq char 'vertical-scroll-bar)
161 (command-execute (lookup-key local-map key) nil key))))) 161 (command-execute (lookup-key local-map key) nil key)))))