Mercurial > emacs
changeset 32721:0574ffc14f77
(w32_load_system_font): Call w32_cache_char_metrics.
(w32_unload_font): Free per_char array if present.
author | Andrew Innes <andrewi@gnu.org> |
---|---|
date | Sat, 21 Oct 2000 13:29:45 +0000 |
parents | 8530cd0a7455 |
children | 6385ffa62dd5 |
files | src/w32fns.c |
diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/w32fns.c Sat Oct 21 13:26:41 2000 +0000 +++ b/src/w32fns.c Sat Oct 21 13:29:45 2000 +0000 @@ -5430,6 +5430,7 @@ return NULL; font = (XFontStruct *) xmalloc (sizeof (XFontStruct)); + bzero (font, sizeof (*font)); /* Set bdf to NULL to indicate that this is a Windows font. */ font->bdf = NULL; @@ -5464,6 +5465,8 @@ ? VARIABLE_PITCH : FIXED_PITCH); lf.lfOutPrecision = ((font->tm.tmPitchAndFamily & TMPF_VECTOR) ? OUT_STROKE_PRECIS : OUT_STRING_PRECIS); + + w32_cache_char_metrics (font); } UNBLOCK_INPUT; @@ -5592,6 +5595,7 @@ { if (font) { + if (font->per_char) xfree (font->per_char); if (font->bdf) w32_free_bdf_font (font->bdf); if (font->hfont) DeleteObject(font->hfont);