From: Kenichi Handa <handa@m17n.org>
Date: Tue, 10 Jun 2008 02:06:27 +0000 (+0000)
Subject: (add_opentype_font_name_to_list): Adjusted for
X-Git-Tag: emacs-pretest-23.0.90~4949
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9ede710945c9dd7461a2782a7943cb375261e51e;p=emacs.git

(add_opentype_font_name_to_list): Adjusted for
the change of font_intern_prop.
---

diff --git a/src/w32uniscribe.c b/src/w32uniscribe.c
index 6cf46b9e270..470dfd9d181 100644
--- a/src/w32uniscribe.c
+++ b/src/w32uniscribe.c
@@ -486,7 +486,7 @@ add_opentype_font_name_to_list (logical_font, physical_font, font_type,
     return 1;
 
   family = font_intern_prop (logical_font->elfLogFont.lfFaceName,
-			     strlen (logical_font->elfLogFont.lfFaceName));
+			     strlen (logical_font->elfLogFont.lfFaceName), 1);
   if (! memq_no_quit (family, *list))
     *list = Fcons (family, *list);