aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJohn Paul Wallington <[email protected]>2005-12-03 02:31:40 +0000
committerJohn Paul Wallington <[email protected]>2005-12-03 02:31:40 +0000
commit6273dc682119226c80cebf63e651908d80324c03 (patch)
tree3645381ace8a26c9275ff4af42cd473e6d64f517
parent21b15ee87ea34f05f65e579302103336d74e59e3 (diff)
(atomic-change-group): Add edebug and indentation spec.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/subr.el1
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0b029e203d..2bf21281c4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-12-03 Johan Bockg,Ae(Brd <[email protected]>
+
+ * subr.el (atomic-change-group): Add edebug and indentation spec.
+
2005-12-02 Stefan Monnier <[email protected]>
* completion.el (save-completions-file-name): Fix typo in last change.
diff --git a/lisp/subr.el b/lisp/subr.el
index 778f52abff..9b6e122e67 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1602,6 +1602,7 @@ This works regardless of whether undo is enabled in the buffer.
This mechanism is transparent to ordinary use of undo;
if undo is enabled in the buffer and BODY succeeds, the
user can undo the change normally."
+ (declare (indent 0) (debug t))
(let ((handle (make-symbol "--change-group-handle--"))
(success (make-symbol "--change-group-success--")))
`(let ((,handle (prepare-change-group))