(Fx_list_fonts): Call Flist_fonts with the arg PREFER.

This commit is contained in:
Kenichi Handa 2008-06-25 07:35:49 +00:00
parent 7181ea6aa0
commit 34e9727275
2 changed files with 8 additions and 1 deletions

View file

@ -1,5 +1,12 @@
2008-06-25 Kenichi Handa <handa@m17n.org>
* xfaces.c (Fx_list_fonts): Call Flist_fonts with the arg PREFER.
* font.c (font_parse_fcname): Remove unused variables.
(font_sort_entites): Delete the arg SPEC. Caller changed. Fix
for the case of ! best_only.
(font_delete_unmatched): Check DPI and AVGWIDTH too.
* lisp.h (Fstring_to_unibyte): EXFUN it.
* character.h: (str_to_unibyte): Extern it.

View file

@ -1939,7 +1939,7 @@ the WIDTH times as wide as FACE on FRAME. */)
Ffont_put (font_spec, QCsize, make_number (size));
Ffont_put (font_spec, QCavgwidth, make_number (avgwidth));
}
args[0] = Flist_fonts (font_spec, frame, maximum, Qnil);
args[0] = Flist_fonts (font_spec, frame, maximum, font_spec);
for (tail = args[0]; CONSP (tail); tail = XCDR (tail))
XSETCAR (tail, Ffont_xlfd_name (XCAR (tail), Qnil));
if (NILP (frame))