master c55e67081e9: Fix last change to wid-edit.el

[Stephen Berman]

branch: master
commit c55e67081e9873a32b6e665e44f3e5a9c301255f
Author: Stephen Berman <stephen.berman@gmx.net>
Commit: Stephen Berman <stephen.berman@gmx.net>

    Fix last change to wid-edit.el
    
    * lisp/wid-edit.el (widget-choose): Test for stringp instead of
    char-or-string-p, since substitute-command-keys should only apply
    to choice values that are strings. (Bug#64046, Message #37)
---
 lisp/wid-edit.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 234f3d9b74d..606093fd293 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -286,7 +286,7 @@ in the key vector, as in the argument of `define-key'."
   (let ((items (mapc (lambda (x)
                        (when (consp x)
                          (dotimes (i (1- (length x)))
-                           (when (char-or-string-p (nth i x))
+                           (when (stringp (nth i x))
                              (setcar (nthcdr i x)
                                      (substitute-command-keys
                                       (car (nthcdr i x))))))))