From addc1b12cbf5e186ffbb2e42132fc5485c41c0bb Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 14 Jan 2009 16:53:52 +0000 Subject: [PATCH] (chise-tex-encode-region-for-utf-8-jis): Support Thai script. --- chise2otf/elisp/chise-tex.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/chise2otf/elisp/chise-tex.el b/chise2otf/elisp/chise-tex.el index b144689..cd6ea49 100644 --- a/chise2otf/elisp/chise-tex.el +++ b/chise2otf/elisp/chise-tex.el @@ -325,7 +325,12 @@ ;; (insert (decode-char '=jis-x0208-1983 ret))) ((eq (char-ucs chr) #x012B) (delete-char) - (insert "\\={\\i}")) + (insert "\\={\\i}") + ) + ((setq ret (encode-char chr 'thai-tis620)) + (delete-char) + (insert (format "\\ThaiTIS{%X}" (logior ret #x80))) + ) ((and (not (eq (char-ucs chr) #x0439)) (not (eq (char-ucs chr) #x0451)) (setq ret (char-feature chr '=decomposition)) -- 1.7.10.4