From 2ee3abaa317a2c964b685296b0ba44af4e8b30c1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 24 Jul 1997 16:59:16 +0000 Subject: [PATCH] (Fx_create_frame): Don't fail to initialize `font'. --- src/xfns.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/xfns.c b/src/xfns.c index 17e6a64f987..553b32aa716 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -3282,8 +3282,8 @@ This function is an internal primitive--use `make-frame' instead.") { Lisp_Object font; - if (! STRINGP (font)) - font = x_get_arg (dpyinfo, parms, Qfont, "font", "Font", string); + font = x_get_arg (dpyinfo, parms, Qfont, "font", "Font", string); + BLOCK_INPUT; /* First, try whatever font the caller has specified. */ if (STRINGP (font)) -- 2.39.2