# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1083804213 0
# Node ID a5a7f792d532da0fc90734e0df7cd78b4fa2baee
# Parent  f406ef28e71a15a2fab85df9676b7c683d222748
(electric-help-command-loop): Check whether the last character is visible,
not (point-max).

diff -r f406ef28e71a -r a5a7f792d532 lisp/ehelp.el
--- a/lisp/ehelp.el	Thu May 06 00:10:15 2004 +0000
+++ b/lisp/ehelp.el	Thu May 06 00:43:33 2004 +0000
@@ -215,7 +215,7 @@
 	              ;beginning-of-buffer - otherwise pos-visible-in-window-p
 	              ;will yield a wrong result.
 	  (let ((min (pos-visible-in-window-p (point-min)))
-		(max (pos-visible-in-window-p (point-max))))
+		(max (pos-visible-in-window-p (1- (point-max)))))
 	    (cond (isearch-mode 'noprompt)
 		  ((and min max)
 		   (cond (standard "Press q to exit, r to retain ")