+2008-01-11 Richard Stallman <rms@gnu.org>
+
+ * subr.el (atomic-change-group): Prevent undo list truncation.
+
2008-01-11 Martin Rudalics <rudalics@gmx.at>
* cus-start.el (all): Add missing version entries.
(let ((handle (make-symbol "--change-group-handle--"))
(success (make-symbol "--change-group-success--")))
`(let ((,handle (prepare-change-group))
+ ;; Don't truncate any undo data in the middle of this.
+ (undo-outer-limit nil)
+ (undo-limit most-positive-fixnum)
+ (undo-strong-limit most-positive-fixnum)
(,success nil))
(unwind-protect
(progn