(widget-checkbox-action): Clear undo info.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 55938b45170..20369d7a331 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-12-17  Martin Rudalics  <rudalics@gmx.at>  (tiny change)
+
+        * wid-edit.el (widget-checkbox-action): Clear undo info.
+
 2005-12-16  Bill Wohler  <wohler@newt.com>
 
         * menu-bar.el (kill-this-buffer): Set a good example by using menu
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index b6dc9470d2c..ec3614c4d59 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2161,7 +2161,8 @@ when he invoked the menu."
     (when sibling
       (if (widget-value widget)
           (widget-apply sibling :activate)
-        (widget-apply sibling :deactivate)))))
+        (widget-apply sibling :deactivate))
+      (widget-clear-undo))))
 
 ;;; The `checklist' Widget.