Don't always toggle a choice when prompting

* lisp/wid-edit.el (widget-choice-prompt-value): Respect the value
of widget-choice-toggle.  (Bug#60712)

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index b9291af2bd521a543bb07a4a44e40387f30d1814..88f8a36252103652264d658c5f495af788fc0d16 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -3988,7 +3988,8 @@ current choice is inline."
                 nil)
                ((= (length args) 1)
                 (nth 0 args))
-               ((and (= (length args) 2)
+                ((and widget-choice-toggle
+                      (= (length args) 2)
                      (memq old args))
                 (if (eq old (nth 0 args))
                     (nth 1 args)