From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 13 Jun 1994 23:40:33 +0000 (+0000)
Subject: (end-of-buffer): Recenter overlay lists.
X-Git-Tag: emacs-19.34~7976
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=97dfc68c2ed63b83892aa0acf3ced92ad557a716;p=emacs.git

(end-of-buffer): Recenter overlay lists.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 484b217c5fa..6dbfccad589 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -289,7 +289,9 @@ Don't use this command in Lisp programs!
 		    (goto-char (window-start))
 		    (vertical-motion (window-height))
 		    (< (point) old-point)))
-	(recenter -3))))
+	(progn
+	  (overlay-recenter (point))
+	  (recenter -3)))))
 
 (defun mark-whole-buffer ()
   "Put point at beginning and mark at end of buffer.