Mercurial > emacs
changeset 99008:91e50ad51eec
(undo-more): Add comment explaining the operations on pending-undo-list
and buffer-undo-list.
| author | Alan Mackenzie <acm@muc.de> |
|---|---|
| date | Tue, 21 Oct 2008 21:14:04 +0000 |
| parents | 847cf809659f |
| children | 9b43c2d83a1e |
| files | lisp/simple.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Tue Oct 21 21:12:33 2008 +0000 +++ b/lisp/simple.el Tue Oct 21 21:14:04 2008 +0000 @@ -1725,6 +1725,9 @@ (error (concat "No further undo information" (and undo-in-region " for region")))) (let ((undo-in-progress t)) + ;; Note: The following, while pulling elements off + ;; `pending-undo-list' will call primitive change functions which + ;; will push more elements onto `buffer-undo-list'. (setq pending-undo-list (primitive-undo n pending-undo-list)) (if (null pending-undo-list) (setq pending-undo-list t))))