aboutsummaryrefslogtreecommitdiffstats
path: root/src/undo.c
diff options
context:
space:
mode:
authorKenichi Handa2010-07-09 15:55:27 +0900
committerKenichi Handa2010-07-09 15:55:27 +0900
commite1ffae3bb6b87eb824ea9c6291935584fc806cc4 (patch)
treeee223039304ceff6edbc2df45ef36f69805c369e /src/undo.c
parent80d4189187791916590b6c2b20b54588d432bb75 (diff)
parent0508c67f47a9b79684f2f454010a2d086df7f35b (diff)
downloademacs-e1ffae3bb6b87eb824ea9c6291935584fc806cc4.tar.gz
emacs-e1ffae3bb6b87eb824ea9c6291935584fc806cc4.zip
merge trunk
Diffstat (limited to 'src/undo.c')
-rw-r--r--src/undo.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/undo.c b/src/undo.c
index 2d491a41221..14a8268394a 100644
--- a/src/undo.c
+++ b/src/undo.c
@@ -288,7 +288,7 @@ DEFUN ("undo-boundary", Fundo_boundary, Sundo_boundary, 0, 0, 0,
288 doc: /* Mark a boundary between units of undo. 288 doc: /* Mark a boundary between units of undo.
289An undo command will stop at this point, 289An undo command will stop at this point,
290but another undo command will undo to the previous boundary. */) 290but another undo command will undo to the previous boundary. */)
291 () 291 (void)
292{ 292{
293 Lisp_Object tem; 293 Lisp_Object tem;
294 if (EQ (current_buffer->undo_list, Qt)) 294 if (EQ (current_buffer->undo_list, Qt))
@@ -455,8 +455,7 @@ truncate_undo_list (struct buffer *b)
455DEFUN ("primitive-undo", Fprimitive_undo, Sprimitive_undo, 2, 2, 0, 455DEFUN ("primitive-undo", Fprimitive_undo, Sprimitive_undo, 2, 2, 0,
456 doc: /* Undo N records from the front of the list LIST. 456 doc: /* Undo N records from the front of the list LIST.
457Return what remains of the list. */) 457Return what remains of the list. */)
458 (n, list) 458 (Lisp_Object n, Lisp_Object list)
459 Lisp_Object n, list;
460{ 459{
461 struct gcpro gcpro1, gcpro2; 460 struct gcpro gcpro1, gcpro2;
462 Lisp_Object next; 461 Lisp_Object next;