comparison src/xfns.c @ 6143:45bdd0e4b6ea

(Fx_list_fonts): Avoid confused increment of info.
author Karl Heuer <kwzh@gnu.org>
date Wed, 02 Mar 1994 05:48:00 +0000
parents 0021cbdc591b
children c6cafb1168b3
comparison
equal deleted inserted replaced
6142:2dbc79d01191 6143:45bdd0e4b6ea
2580 int i; 2580 int i;
2581 2581
2582 tail = &list; 2582 tail = &list;
2583 for (i = 0; i < num_fonts; i++) 2583 for (i = 0; i < num_fonts; i++)
2584 { 2584 {
2585 XFontStruct *thisinfo;
2586
2585 #ifdef BROKEN_XLISTFONTSWITHINFO 2587 #ifdef BROKEN_XLISTFONTSWITHINFO
2586 BLOCK_INPUT; 2588 BLOCK_INPUT;
2587 info = XLoadQueryFont (x_current_display, names[i]); 2589 thisinfo = XLoadQueryFont (x_current_display, names[i]);
2588 UNBLOCK_INPUT; 2590 UNBLOCK_INPUT;
2589 #else 2591 #else
2590 info = &info[i]; 2592 thisinfo = &info[i];
2591 #endif 2593 #endif
2592 if (info && (! size_ref 2594 if (thisinfo && (! size_ref
2593 || same_size_fonts (info, size_ref))) 2595 || same_size_fonts (thisinfo, size_ref)))
2594 { 2596 {
2595 *tail = Fcons (build_string (names[i]), Qnil); 2597 *tail = Fcons (build_string (names[i]), Qnil);
2596 tail = &XCONS (*tail)->cdr; 2598 tail = &XCONS (*tail)->cdr;
2597 } 2599 }
2598 } 2600 }