summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2006-11-08 17:31:46 +0000
committerRichard M. Stallman <rms@gnu.org>2006-11-08 17:31:46 +0000
commitd6f5ac1084e4223c88bf060d7e7033ee0d49b008 (patch)
tree1a8bb41a431446c0b58ee08b829b89daf2049d0e /lisp
parent7a309c4ba604a2f9b6864c531794cec106a1a5c7 (diff)
downloademacs-d6f5ac1084e4223c88bf060d7e7033ee0d49b008.tar.gz
(remove-overlays): Call overlay-recenter.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/subr.el2
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 85b188ff581..c64546ee6cc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-11-08 Richard Stallman <rms@gnu.org>
+
+ * subr.el (remove-overlays): Call overlay-recenter.
+
2006-11-08 Vinicius Jose Latorre <viniciusjl@ig.com.br>
* printing.el (pr-alist-custom-set, pr-ps-utility-custom-set)
diff --git a/lisp/subr.el b/lisp/subr.el
index cf09264e4b1..3fcdaaab753 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1960,6 +1960,8 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
"Clear BEG and END of overlays whose property NAME has value VAL.
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-recented (point-max))
(unless beg (setq beg (point-min)))
(unless end (setq end (point-max)))
(if (< end beg)