From 1f221e7a9de90caff4c237c7ed7abffb8f9407b6 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 26 Jul 2006 00:53:14 +0000 Subject: [PATCH] (xfont_list): Don't try listing by :name property if the name is not for XLFD. --- src/xfont.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/xfont.c b/src/xfont.c index ac60b96bb5f..a2b8c5d1d70 100644 --- a/src/xfont.c +++ b/src/xfont.c @@ -396,7 +396,8 @@ xfont_list (frame, spec) font_name = XCDR (val); } - if (STRINGP (font_name)) + if (STRINGP (font_name) + && ! strchr ((char *) SDATA (font_name), ':')) list = xfont_list_pattern (frame, display, (char *) SDATA (font_name)); else if ((len = font_unparse_xlfd (spec, 0, name, 256)) < 0) return null_vector; -- 2.39.5