; * lisp/emacs-lisp/icons.el (icon-preference): repair type

diff --git a/lisp/emacs-lisp/icons.el b/lisp/emacs-lisp/icons.el
index 00784c4d95df03000f59adf1f4b03638d486df5c..c16bb966121c59c92e40e7cf0425cb02c4b506e8 100644 (file)
--- a/lisp/emacs-lisp/icons.el
+++ b/lisp/emacs-lisp/icons.el
@@ -49,10 +49,10 @@ on the current display, and \"degrade\" gracefully to an icon
 type that's available."
   :version "29.1"
   :group 'customize
-  :type '(repeat (const :tag "Images" image)
-                 (const :tag "Colorful Emojis" emoji)
-                 (const :tag "Monochrome Symbols" symbol)
-                 (const :tag "Text Only" text)))
+  :type '(repeat (choice (const :tag "Images" image)
+                         (const :tag "Colorful Emojis" emoji)
+                         (const :tag "Monochrome Symbols" symbol)
+                         (const :tag "Text Only" text))))
 
 (defmacro define-icon (name parent specification documentation &rest keywords)
   "Define an icon identified by NAME.