aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/ChangeLog5
-rw-r--r--src/w32font.c9
2 files changed, 10 insertions, 4 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index ef08589e4ea..8d2fbd33f88 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
12008-11-27 Juanma Barranquero <lekktu@gmail.com>
2
3 * w32font.c (add_font_entity_to_list): Pass the right LOGFONT
4 pointer to check_face_name.
5
12008-11-27 Kenichi Handa <handa@m17n.org> 62008-11-27 Kenichi Handa <handa@m17n.org>
2 7
3 * category.h (SET_CATEGORY_SET): Call set_category_set. 8 * category.h (SET_CATEGORY_SET): Call set_category_set.
diff --git a/src/w32font.c b/src/w32font.c
index 40d4bd64049..c9494b4f29c 100644
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -447,7 +447,7 @@ w32font_text_extents (font, code, nglyphs, metrics)
447 /* For non-truetype fonts, GetGlyphOutlineW is not supported, so 447 /* For non-truetype fonts, GetGlyphOutlineW is not supported, so
448 fallback on other methods that will at least give some of the metric 448 fallback on other methods that will at least give some of the metric
449 information. */ 449 information. */
450 450
451 /* Make array big enough to hold surrogates. */ 451 /* Make array big enough to hold surrogates. */
452 wcode = alloca (nglyphs * sizeof (WORD) * 2); 452 wcode = alloca (nglyphs * sizeof (WORD) * 2);
453 for (i = 0; i < nglyphs; i++) 453 for (i = 0; i < nglyphs; i++)
@@ -812,7 +812,7 @@ w32font_open_internal (f, font_entity, pixel_size, font_object)
812 812
813 if (!metrics) 813 if (!metrics)
814 GetTextMetricsW (dc, &w32_font->metrics); 814 GetTextMetricsW (dc, &w32_font->metrics);
815 815
816 w32_font->cached_metrics = NULL; 816 w32_font->cached_metrics = NULL;
817 w32_font->n_cache_blocks = 0; 817 w32_font->n_cache_blocks = 0;
818 818
@@ -843,7 +843,7 @@ w32font_open_internal (f, font_entity, pixel_size, font_object)
843 } 843 }
844 844
845 font->max_width = w32_font->metrics.tmMaxCharWidth; 845 font->max_width = w32_font->metrics.tmMaxCharWidth;
846 /* Parts of Emacs display assume that height = ascent + descent... 846 /* Parts of Emacs display assume that height = ascent + descent...
847 so height is defined later, after ascent and descent. 847 so height is defined later, after ascent and descent.
848 font->height = w32_font->metrics.tmHeight 848 font->height = w32_font->metrics.tmHeight
849 + w32_font->metrics.tmExternalLeading; 849 + w32_font->metrics.tmExternalLeading;
@@ -1382,7 +1382,8 @@ add_font_entity_to_list (logical_font, physical_font, font_type, lParam)
1382 /* Check for well known substitutions that mess things up in the 1382 /* Check for well known substitutions that mess things up in the
1383 presence of Type-1 fonts of the same name. */ 1383 presence of Type-1 fonts of the same name. */
1384 && (match_data->pattern.lfFaceName[0] 1384 && (match_data->pattern.lfFaceName[0]
1385 && check_face_name (logical_font, logical_font->elfFullName))) 1385 && check_face_name (&logical_font->elfLogFont,
1386 logical_font->elfFullName)))
1386 { 1387 {
1387 Lisp_Object entity 1388 Lisp_Object entity
1388 = w32_enumfont_pattern_entity (match_data->frame, logical_font, 1389 = w32_enumfont_pattern_entity (match_data->frame, logical_font,