From 9a32686f791cdb28ea0f1c3d7717b37cd3d87c99 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Fri, 1 Aug 1997 00:29:34 +0000
Subject: [PATCH] (x_list_fonts): Request at least 10 fonts by XListFonts.

---
 src/xterm.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/xterm.c b/src/xterm.c
index 742bffd84d9..8955b345140 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -6359,6 +6359,10 @@ x_list_fonts (f, pattern, size, maxnames)
   if (NILP (patterns))
     patterns = Fcons (pattern, Qnil);
 
+  /* We try at least 10 fonts because X server will return auto-scaled
+     fonts at the head.  */
+  if (maxnames < 10) maxnames = 10;
+
   for (; CONSP (patterns); patterns = XCONS (patterns)->cdr)
     {
       int num_fonts;
-- 
2.39.2