X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fredisplay-x.c;h=c174e8ac3163128bc21d69223f3c961c4cc40608;hb=38914e335d92b50143197fe1c57190bfd5fa1799;hp=cf1766ec3bcdc4f4dd0f177397513c6dc3484edd;hpb=b623fb6516df4ba24a9a16f8199b4341eb9aff52;p=chise%2Fxemacs-chise.git

diff --git a/src/redisplay-x.c b/src/redisplay-x.c
index cf1766e..c174e8a 100644
--- a/src/redisplay-x.c
+++ b/src/redisplay-x.c
@@ -151,7 +151,19 @@ separate_textual_runs (unsigned char *text_storage,
       int dimension;
       int graphic;
 
-      BREAKUP_CHAR (ch, charset, byte1, byte2);
+      if (EQ (Vdefault_coded_charset_priority_list_for_font, Qnil))
+	BREAKUP_CHAR (ch, charset, byte1, byte2);
+      else
+	{
+	  Lisp_Object original_default_coded_charset_priority_list
+	    = Vdefault_coded_charset_priority_list;
+
+	  Vdefault_coded_charset_priority_list
+	    = Vdefault_coded_charset_priority_list_for_font;
+	  BREAKUP_CHAR (ch, charset, byte1, byte2);
+	  Vdefault_coded_charset_priority_list
+	    = original_default_coded_charset_priority_list;
+	}
       dimension = XCHARSET_DIMENSION (charset);
       graphic   = XCHARSET_GRAPHIC   (charset);