From 74712156d663b59a94f55da83101ea27b140e16e Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 2 Mar 1994 05:48:00 +0000
Subject: [PATCH] (Fx_list_fonts): Avoid confused increment of info.

---
 src/xfns.c | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/src/xfns.c b/src/xfns.c
index 19c0f0b3739..c5a064809fa 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -2582,15 +2582,17 @@ fonts), even if they match PATTERN and FACE.")
       tail = &list;
       for (i = 0; i < num_fonts; i++)
         {
+	  XFontStruct *thisinfo;
+
 #ifdef BROKEN_XLISTFONTSWITHINFO
           BLOCK_INPUT;
-          info = XLoadQueryFont (x_current_display, names[i]);
+          thisinfo = XLoadQueryFont (x_current_display, names[i]);
           UNBLOCK_INPUT;
 #else
-	  info = &info[i];
+	  thisinfo = &info[i];
 #endif
-          if (info && (! size_ref
-		       || same_size_fonts (info, size_ref)))
+          if (thisinfo && (! size_ref
+			   || same_size_fonts (thisinfo, size_ref)))
 	    {
 	      *tail = Fcons (build_string (names[i]), Qnil);
 	      tail = &XCONS (*tail)->cdr;
-- 
2.39.5