(x-style-funcs-alist): Remove duplicated code.

diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 365bc3f39217b5cee97c3ef799ca8a7dccc3c65a..f3834074a36f92b4aa88ea112419558e7ddfe67d 100644 (file)
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -402,21 +402,6 @@ STYLE is a style of FONTSET, one of the followings:
   bold-italic, demibold-italic, bold-oblique, demibold-oblique.
 FONTLIST is an alist of charsets vs font names to be used in FONSET.")
 
-(defconst x-style-funcs-alist
-  `((bold . x-make-font-bold)
-    (demibold . x-make-font-demibold)
-    (italic . x-make-font-italic)
-    (oblique . x-make-font-oblique)
-    (bold-italic . x-make-font-bold-italic)
-    (demibold-italic
-     . ,(function (lambda (x) (x-make-font-italic (x-make-font-demibold x)))))
-    (demibold-oblique
-     . ,(function (lambda (x) (x-make-font-oblique (x-make-font-demibold x)))))
-    (bold-oblique
-     . ,(function (lambda (x) (x-make-font-oblique (x-make-font-bold x))))))
-  "Alist of font style vs function to generate a X font name of the style.
-The function is called with one argument, a font name.")
-
 (defconst x-style-funcs-alist
   `((bold . x-make-font-bold)
     (demibold . x-make-font-demibold)