From 4033f46bd79e8ab0aaaf384a9d11841cc9217efe Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 22 Apr 1994 08:49:30 +0000 Subject: [PATCH] (set-default-font): Call frame-update-faces. --- lisp/frame.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/frame.el b/lisp/frame.el index 9ef36acf308..1083037b015 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -459,7 +459,9 @@ If FRAME is omitted, describe the currently selected frame." When called interactively, prompt for the name of the font to use." (interactive "sFont name: ") (modify-frame-parameters (selected-frame) - (list (cons 'font font-name)))) + (list (cons 'font font-name))) + ;; Update faces that want a bold or italic version of the default font. + (frame-update-faces (selected-frame))) (defun set-background-color (color-name) "Set the background color of the selected frame to COLOR. -- 2.39.5