From ee6bb6939fe507dc98986bfc23794da6110f61ef Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 12 Nov 2006 19:55:58 +0000 Subject: [PATCH] (remove-overlays): Fix last change. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index 4748b4d8dcb..87ba9d5833e 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1961,9 +1961,9 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there." Overlays might be moved and/or split. BEG and END default respectively to the beginning and end of buffer." ;; This speeds up the loops over overlays. - (overlay-recenter (point-max)) (unless beg (setq beg (point-min))) (unless end (setq end (point-max))) + (overlay-recenter end) (if (< end beg) (setq beg (prog1 end (setq end beg)))) (save-excursion -- 2.39.5