mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

(widget-choice-value-create): Use equal' instead of eq'.

Browse Source
This commit is contained in:
Richard M. Stallman 1999-02-15 12:07:01 +00:00
parent a63063ae57
commit 1468535ed1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/wid-edit.el
View File

@ -1947,7 +1947,7 @@ If END is omitted, it defaults to the length of LIST."
(explicit (widget-get widget :explicit-choice))
(explicit-value (widget-get widget :explicit-choice-value))
current)
(if (and explicit (eq value explicit-value))
(if (and explicit (equal value explicit-value))
(progn
;; If the user specified the choice for this value,
;; respect that choice as long as the value is the same.