diff options
author | John Paul Wallington <[email protected]> | 2005-12-03 02:31:40 +0000 |
---|---|---|
committer | John Paul Wallington <[email protected]> | 2005-12-03 02:31:40 +0000 |
commit | 6273dc682119226c80cebf63e651908d80324c03 (patch) | |
tree | 3645381ace8a26c9275ff4af42cd473e6d64f517 | |
parent | 21b15ee87ea34f05f65e579302103336d74e59e3 (diff) |
(atomic-change-group): Add edebug and indentation spec.
-rw-r--r-- | lisp/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/subr.el | 1 |
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)) |