XEmacs 21.2.12

[chise/xemacs-chise.git.1] / lisp / x-faces.el

diff --git a/lisp/x-faces.el b/lisp/x-faces.el
index 21895c3..74c1d35 100644 (file)
--- a/lisp/x-faces.el
+++ b/lisp/x-faces.el
@@ -506,7 +506,7 @@ Otherwise, it returns the next larger version of this font that is defined."
        ;; globally.  This means we should override global
        ;; defaults for all X device classes.
        (remove-specifier (face-font face) locale x-tag-set nil))
-      (set-face-font face fn locale nil append))
+      (set-face-font face fn locale 'x append))
     ;; Kludge-o-rooni.  Set the foreground and background resources for
     ;; X devices only -- otherwise things tend to get all messed up
     ;; if you start up an X frame and then later create a TTY frame.