From: Jason Rumney <jasonr@gnu.org>
Date: Thu, 29 May 2008 16:12:50 +0000 (+0000)
Subject: (w32font_open_internal): Prefer truetype fonts unless
X-Git-Tag: emacs-pretest-23.0.90~5229
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1519d52ee5536601899189485a96674113a42199;p=emacs.git

(w32font_open_internal): Prefer truetype fonts unless
'raster' specified.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 722c9fb0fb8..fbebde7a3a7 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-29  Jason Rumney  <jasonr@gnu.org>
+
+        * w32font.c (w32font_open_internal): Prefer truetype fonts unless
+        'raster' specified.
+
 2008-05-29  Juanma Barranquero  <lekktu@gmail.com>
 
 	* xfaces.c (Fx_list_fonts, Finternal_copy_lisp_face):
diff --git a/src/w32font.c b/src/w32font.c
index 1828af108ee..78f8049d851 100644
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -772,6 +772,12 @@ w32font_open_internal (f, font_entity, pixel_size, font_object)
   bzero (&logfont, sizeof (logfont));
   fill_in_logfont (f, &logfont, font_entity);
 
+  /* Prefer truetype fonts, to avoid known problems with type1 fonts, and
+     limitations in bitmap fonts.  */
+  val = AREF (font_entity, FONT_FOUNDRY_INDEX);
+  if (!EQ (val, Qraster))
+    logfont.lfOutPrecision = OUT_TT_PRECIS;
+
   size = XINT (AREF (font_entity, FONT_SIZE_INDEX));
   if (!size)
     size = pixel_size;