aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2008-07-06 03:51:06 +0000
committerChong Yidong2008-07-06 03:51:06 +0000
commitbe22aa971355e15a78d46c60ce285afd474da313 (patch)
treea0825b8ae6f3439e1f561614942d1efeb77c763b
parentfe5d61c40bff7cc1fc6b0ad616bcd28b336d3cd3 (diff)
downloademacs-be22aa971355e15a78d46c60ce285afd474da313.tar.gz
emacs-be22aa971355e15a78d46c60ce285afd474da313.zip
(set_font_frame_param): Don't try to set the font parameter if it is
still unspecified in the lface.
-rw-r--r--src/xfaces.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/xfaces.c b/src/xfaces.c
index 382e1327679..ed802b03f7c 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -3501,11 +3501,14 @@ set_font_frame_param (frame, lface)
3501 Lisp_Object frame, lface; 3501 Lisp_Object frame, lface;
3502{ 3502{
3503 struct frame *f = XFRAME (frame); 3503 struct frame *f = XFRAME (frame);
3504 Lisp_Object font;
3504 3505
3505 if (FRAME_WINDOW_P (f)) 3506 if (FRAME_WINDOW_P (f)
3507 /* Don't do anything if the font is `unspecified'. This can
3508 happen during frame creation. */
3509 && (font = LFACE_FONT (lface),
3510 ! UNSPECIFIEDP (font)))
3506 { 3511 {
3507 Lisp_Object font = LFACE_FONT (lface);
3508
3509 if (FONT_SPEC_P (font)) 3512 if (FONT_SPEC_P (font))
3510 { 3513 {
3511 font = font_load_for_lface (f, XVECTOR (lface)->contents, font); 3514 font = font_load_for_lface (f, XVECTOR (lface)->contents, font);