changeset 90356:c363a0b675ba

(ctext-pre-write-conversion): Produce extra designation sequence for ASCII at the end off extended segment.
author Kenichi Handa <handa@m17n.org>
date Wed, 08 Mar 2006 11:56:05 +0000
parents 272bc1a789ee
children ee03316bed9d
files lisp/international/mule.el
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule.el	Tue Mar 07 11:05:39 2006 +0000
+++ b/lisp/international/mule.el	Wed Mar 08 11:56:05 2006 +0000
@@ -1527,6 +1527,11 @@
 		       (encode-coding-region last-pos (point) coding-system)
 		       (setq len (+ (length encoding-name) 1
 				    (- (point) last-pos)))
+		       ;; According to the spec of CTEXT, it is not
+		       ;; necessary to produding this extra
+		       ;; designation sequence, but some buggy
+		       ;; application (e.g. crxvt-gb) requires it.
+		       (insert "\e(B")
 		       (save-excursion
 			 (goto-char last-pos)
 			 (insert (format "\e%%/%d" noctets))