mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(remove-overlays): Fix last change.

Browse Source
This commit is contained in:
Richard M. Stallman 2006-11-12 19:55:58 +00:00
parent 9e2f5050bc
commit ee6bb6939f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/subr.el
View File

@ -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