From: tomo <tomo>
Date: Tue, 16 Nov 1999 20:25:23 +0000 (+0000)
Subject: (char_encode_iso2022): Output `~' if ISO 2022 coded-charset is not
X-Git-Tag: r21-2-19-utf-2000-0_13-0~165
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0709bb04c390679ff5d274b81e7f9a3e0bdf05d6;p=chise%2Fxemacs-chise.git-

(char_encode_iso2022): Output `~' if ISO 2022 coded-charset is not
found.
---

diff --git a/src/text-coding.c b/src/text-coding.c
index fd1dc8f..7ce8b94 100644
--- a/src/text-coding.c
+++ b/src/text-coding.c
@@ -4837,6 +4837,11 @@ char_encode_iso2022 (struct encoding_stream *str, Emchar ch,
 			       Vdefault_coded_charset_priority_list));
 	    }
 	  BREAKUP_CHAR (ch, charset, byte1, byte2);
+	  if (!XCHARSET_FINAL (charset))
+	    {
+	      charset = Vcharset_ascii;
+	      byte1 = '~';
+	    }
 	found:
 	  Vdefault_coded_charset_priority_list
 	    = original_default_coded_charset_priority_list;