From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 15 Feb 1999 12:07:01 +0000 (+0000)
Subject: (widget-choice-value-create): Use `equal' instead of `eq'.
X-Git-Tag: emacs-20.4~632
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1468535ed1694af3a245efbbbfc330082a55c2a6;p=emacs.git

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

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index d7cf8cd210b..43e756b977e 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -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.