mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-16 17:19:41 +00:00
Code Issues Releases Activity

*** empty log message ***

Browse Source
This commit is contained in:
Jim Blandy 1991-04-11 21:20:53 +00:00
parent c6d46f5f2e
commit 181a18b1b5
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/undo.c
View File

@ -151,7 +151,10 @@ truncate_undo_list (list, minsize, maxsize)
last_boundary = Qnil;
/* Always preserve at least the most recent undo record.
If the first element is an undo boundary, skip past it. */
If the first element is an undo boundary, skip past it.
Skip, skip, skip the undo, skip, skip, skip the undo,
Skip, skip, skip the undo, skip to the undo bound'ry. */
if (XTYPE (next) == Lisp_Cons
&& XCONS (next)->car == Qnil)
{