Commit 9df50a31 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(xfont_list): If script is specified for a font, return

null_vector.
(xfont_list_family): Declare argument type.
parent dcce3c58
......@@ -318,6 +318,9 @@ xfont_list (frame, spec)
if (CONSP (extra))
{
val = Fassq (QCotf, extra);
if (! NILP (val))
return null_vector;
val = Fassq (QCscript, extra);
if (! NILP (val))
return null_vector;
val = Fassq (QCname, extra);
......@@ -464,6 +467,7 @@ memq_no_quit (elt, list)
static Lisp_Object
xfont_list_family (frame)
Lisp_Object frame;
{
FRAME_PTR f = XFRAME (frame);
Display_Info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
......
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