diff options
| author | Richard M. Stallman <rms@gnu.org> | 2006-11-12 19:55:58 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2006-11-12 19:55:58 +0000 |
| commit | ee6bb6939fe507dc98986bfc23794da6110f61ef (patch) | |
| tree | ad7336d13fe0e7400f4b0eb866d89c8b90bad21f /lisp | |
| parent | 9e2f5050bc4da8360c53e740445268f34fc26292 (diff) | |
| download | emacs-ee6bb6939fe507dc98986bfc23794da6110f61ef.tar.gz emacs-ee6bb6939fe507dc98986bfc23794da6110f61ef.tar.bz2 emacs-ee6bb6939fe507dc98986bfc23794da6110f61ef.zip | |
(remove-overlays): Fix last change.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
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 |