* xfaces.c (x_face_list_fonts): Set *pfonts to 0 if no fonts found.

This commit is contained in:
Jan Djärv 2003-02-19 05:59:54 +00:00
parent 97d3e8cdeb
commit 72ecb43c59
2 changed files with 10 additions and 2 deletions

View file

@ -1,3 +1,7 @@
2003-02-19 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* xfaces.c (x_face_list_fonts): Set *pfonts to 0 if no fonts found.
2003-02-18 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* xterm.c (x_list_fonts): If maxnames is less than 0, get all font

View file

@ -2516,8 +2516,12 @@ x_face_list_fonts (f, pattern, pfonts, nfonts, try_alternatives_p)
{
Lisp_Object list = Valternate_fontname_alist;
if (fonts) xfree (fonts);
if (*pfonts)
{
xfree (*pfonts);
*pfonts = 0;
}
while (CONSP (list))
{
Lisp_Object entry = XCAR (list);