From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 20 Jul 1993 05:55:31 +0000 (+0000)
Subject: (reposition-window): Don't forward-char if eobp.
X-Git-Tag: emacs-19.34~11669
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f5d7a8f2f81df6eb76c138f2d1dd4e6b59f75d67;p=emacs.git

(reposition-window): Don't forward-char if eobp.
---

diff --git a/lisp/reposition.el b/lisp/reposition.el
index d981eefec5e..0dda524f079 100644
--- a/lisp/reposition.el
+++ b/lisp/reposition.el
@@ -70,7 +70,8 @@ first comment line visible (if point is in a comment)."
 	       (repos-count-screen-lines-signed
 		;; the beginning of the preceding comment
 		(save-excursion
-		  (forward-char 1) (end-of-defun -1) 
+		  (if (not (eobp)) (forward-char 1))
+		  (end-of-defun -1) 
 		  ;; Skip whitespace, newlines, and form feeds.
 		  (re-search-forward "[^\\s \n\014]")
 		  (backward-char 1)