From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 2 Mar 1994 05:48:00 +0000 (+0000)
Subject: (Fx_list_fonts): Avoid confused increment of info.
X-Git-Tag: emacs-19.34~9709
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=74712156d663b59a94f55da83101ea27b140e16e;p=emacs.git

(Fx_list_fonts): Avoid confused increment of info.
---

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;