[Emacs-diffs] /srv/bzr/emacs/trunk r108011: * subr.el (accept-change-group): Fix arg usage.

[Chong Yidong]

------------------------------------------------------------
revno: 108011
fixes bug(s): http://debbugs.gnu.org/6095
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Mon 2012-04-23 23:48:22 +0800
message:
  * subr.el (accept-change-group): Fix arg usage.
modified:
  lisp/ChangeLog
  lisp/subr.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-04-23 15:38:48 +0000
+++ b/lisp/ChangeLog    2012-04-23 15:48:22 +0000
@@ -1,3 +1,7 @@
+2012-04-23  Andreas Politz  <address@hidden>
+
+       * subr.el (accept-change-group): Fix arg usage (Bug#6095).
+
 2012-04-23  Chong Yidong  <address@hidden>
 
        * cus-edit.el (customize-apropos, customize-apropos-options):

=== modified file 'lisp/subr.el'
--- a/lisp/subr.el      2012-04-20 08:48:50 +0000
+++ b/lisp/subr.el      2012-04-23 15:48:22 +0000
@@ -2391,7 +2391,7 @@
 This finishes the change group by accepting its changes as final."
   (dolist (elt handle)
     (with-current-buffer (car elt)
-      (if (eq elt t)
+      (if (eq (cdr elt) t)
          (setq buffer-undo-list t)))))
 
 (defun cancel-change-group (handle)