Auto-commit of loaddefs files.

[gnu-emacs] / lisp / wid-edit.el

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 31cc8ad9ca9e5a91c656d7b41c887dc1b3187fd9..7b7813db94b3f5409ee7e9c15fff1b21a82cbb10 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2283,9 +2283,9 @@ If the item is checked, CHOSEN is a cons whose cdr is the value."
     (while vals
       (let ((answer (widget-checklist-match-up args vals)))
        (cond (answer
-              (let ((vals (widget-match-inline answer vals)))
-                (setq found (append found (car vals))
-                      vals (cdr vals)
+              (let ((vals2 (widget-match-inline answer vals)))
+                (setq found (append found (car vals2))
+                      vals (cdr vals2)
                       args (delq answer args))))
              (greedy
               (setq rest (append rest (list (car vals)))