Commit 18f39d0e authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(Ffont_info): Change for Lisp_Object selected_frame.

(Ffontset_info): DItto.
parent 74c2d1c6
......@@ -709,12 +709,9 @@ If the named font is not yet loaded, return nil.")
CHECK_STRING (name, 0);
if (NILP (frame))
f = selected_frame;
else
{
CHECK_LIVE_FRAME (frame, 1);
f = XFRAME (frame);
}
frame = selected_frame;
CHECK_LIVE_FRAME (frame, 1);
f = XFRAME (frame);
if (!query_font_func)
error ("Font query function is not supported");
......@@ -761,12 +758,9 @@ loading failed.")
CHECK_STRING(name, 0);
if (NILP (frame))
f = selected_frame;
else
{
CHECK_LIVE_FRAME (frame, 1);
f = XFRAME (frame);
}
frame = selected_frame;
CHECK_LIVE_FRAME (frame, 1);
f = XFRAME (frame);
fontset = fs_query_fontset (f, XSTRING (name)->data);
if (fontset < 0)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment