summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/faces.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index bb506e6812a..36336f9b360 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -840,6 +840,9 @@ selected frame."
(if (listp font)
(let ((bold (memq 'bold font))
(italic (memq 'italic font)))
+ ;; Ignore any previous (string-valued) font, it might not even
+ ;; be the right size anymore.
+ (set-face-font face nil frame)
(cond ((and bold italic)
(make-face-bold-italic face frame t))
(bold