From: Jason Rumney <jasonr@gnu.org>
Date: Fri, 10 May 2002 19:18:53 +0000 (+0000)
Subject: (enum_font_cb2): Don't use DBCS raster fonts.
X-Git-Tag: ttn-vms-21-2-B4~15105
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6358474d16a6209b0d4ed6b2ccbd8365ca8ca718;p=emacs.git

(enum_font_cb2): Don't use DBCS raster fonts.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 1cabb7afae4..1436945cd2b 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-05-10  Jason Rumney  <jasonr@gnu.org>
+
+	* w32fns.c (enum_font_cb2): Avoid DBCS raster fonts.
+
 2002-05-10  Eli Zaretskii  <eliz@is.elta.co.il>
 
 	* coding.c (encode_coding_sjis_big5): Enclose bitwise AND in
diff --git a/src/w32fns.c b/src/w32fns.c
index 2345b95bdcc..799bc084f16 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -7127,6 +7127,21 @@ enum_font_cb2 (lplf, lptm, FontType, lpef)
       lplf->elfLogFont.lfCharSet != lpef->logfont.lfCharSet)
     return 1;
 
+  if (FontType == RASTER_FONTTYPE)
+    {
+      /* DBCS raster fonts have problems displaying, so skip them.  */
+      int charset = lplf->elfLogFont.lfCharSet;
+      if (charset == SHIFTJIS_CHARSET
+	  || charset == HANGEUL_CHARSET
+	  || charset == CHINESEBIG5_CHARSET
+	  || charset == GB2312_CHARSET
+#ifdef JOHAB_CHARSET
+	  || charset == JOHAB_CHARSET
+#endif
+	  )
+	return 1;
+    }
+
   {
     char buf[100];
     Lisp_Object width = Qnil;