aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2004-05-06 00:43:33 +0000
committerJuanma Barranquero2004-05-06 00:43:33 +0000
commit1d4c12573891112e58eb74035bc1f3fe213e0ca2 (patch)
tree3651942a2dd96ddbfdd6e5e9d38dc6a9cbf77797
parent948d29955e019dfa516b07e3458582c827b0577d (diff)
downloademacs-1d4c12573891112e58eb74035bc1f3fe213e0ca2.tar.gz
emacs-1d4c12573891112e58eb74035bc1f3fe213e0ca2.zip
(electric-help-command-loop): Check whether the last character is visible,
not (point-max).
-rw-r--r--lisp/ehelp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ehelp.el b/lisp/ehelp.el
index 641faca557a..e80c129d3ea 100644
--- a/lisp/ehelp.el
+++ b/lisp/ehelp.el
@@ -215,7 +215,7 @@ BUFFER is put into `default-major-mode' (or `fundamental-mode') when we exit."
215 ;beginning-of-buffer - otherwise pos-visible-in-window-p 215 ;beginning-of-buffer - otherwise pos-visible-in-window-p
216 ;will yield a wrong result. 216 ;will yield a wrong result.
217 (let ((min (pos-visible-in-window-p (point-min))) 217 (let ((min (pos-visible-in-window-p (point-min)))
218 (max (pos-visible-in-window-p (point-max)))) 218 (max (pos-visible-in-window-p (1- (point-max)))))
219 (cond (isearch-mode 'noprompt) 219 (cond (isearch-mode 'noprompt)
220 ((and min max) 220 ((and min max)
221 (cond (standard "Press q to exit, r to retain ") 221 (cond (standard "Press q to exit, r to retain ")