# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1213136040 0
# Node ID 67f150b4adbef4a121774584cffb5ca393b5af86
# Parent  b0653ad2932d6fc6691d0dc63de7de86d480ec37
(add_opentype_font_name_to_list): Skip non unicode fonts.

diff -r b0653ad2932d -r 67f150b4adbe src/ChangeLog
--- a/src/ChangeLog	Tue Jun 10 22:01:59 2008 +0000
+++ b/src/ChangeLog	Tue Jun 10 22:14:00 2008 +0000
@@ -1,3 +1,8 @@
+2008-06-10  Jason Rumney  <jasonr@gnu.org>
+
+        * w32uniscribe.c (add_opentype_font_name_to_list): Skip non unicode
+        fonts.
+
 2008-06-10  Chong Yidong  <cyd@stupidchicken.com>
 
 	* xfns.c (Fx_font_dialog): New function.
diff -r b0653ad2932d -r 67f150b4adbe src/w32uniscribe.c
--- a/src/w32uniscribe.c	Tue Jun 10 22:01:59 2008 +0000
+++ b/src/w32uniscribe.c	Tue Jun 10 22:14:00 2008 +0000
@@ -485,6 +485,13 @@
       && font_type != TRUETYPE_FONTTYPE)
     return 1;
 
+  /* Skip fonts that have no unicode coverage.  */
+  if (!physical_font->ntmFontSig.fsUsb[3]
+      && !physical_font->ntmFontSig.fsUsb[2]
+      && !physical_font->ntmFontSig.fsUsb[1]
+      && !(physical_font->ntmFontSig.fsUsb[0] & 0x3fffffff))
+    return 1;
+
   family = font_intern_prop (logical_font->elfLogFont.lfFaceName,
 			     strlen (logical_font->elfLogFont.lfFaceName), 1);
   if (! memq_no_quit (family, *list))