# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 898711816 0
# Node ID 6eb4e6832d2d3b83b8ccbada6551715543cdd246
# Parent  2f3b4c74e9a1192fbc2a40d0e81d6c92b6bb19f2
(fontset-default-styles): Fix custom type.

diff -r 2f3b4c74e9a1 -r 6eb4e6832d2d lisp/international/fontset.el
--- a/lisp/international/fontset.el	Wed Jun 24 09:36:08 1998 +0000
+++ b/lisp/international/fontset.el	Wed Jun 24 18:10:16 1998 +0000
@@ -429,8 +429,9 @@
 and combinations of one from each group,
 such as `bold-italic' and `demibold-oblique'."
   :group 'faces
-  :type '(set bold demibold italic oblique bold-italic bold-oblique
-	      demibold-italic demibold-oblique))
+  :type '(set (const bold) (const demibold) (const italic) (const oblique)
+	      (const bold-italic) (const bold-oblique) (const demibold-italic)
+	      (const demibold-oblique)))
 
 (defun x-modify-font-name (fontname style)
   "Substitute style specification part of FONTNAME for STYLE.