From: tomo <tomo>
Date: Thu, 24 Jan 2008 19:30:44 +0000 (+0000)
Subject: (chise-tex-encode-region-for-utf-8-jis): Use \GTpjG{4933} for JU+8DBC.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fomega.git;a=commitdiff_plain;h=27b33499c7ebe0a578cfab3ca7e5f82bab1e0242

(chise-tex-encode-region-for-utf-8-jis): Use \GTpjG{4933} for JU+8DBC.
---

diff --git a/chise2otf/elisp/chise-tex.el b/chise2otf/elisp/chise-tex.el
index 3eb1948..b144689 100644
--- a/chise2otf/elisp/chise-tex.el
+++ b/chise2otf/elisp/chise-tex.el
@@ -411,6 +411,10 @@
 		  ((eq chr ?\u2637)
 		   (delete-char)
 		   (insert "\\UCSgb{2637}"))
+		  ((eq (encode-char chr '=ucs@jis) #x8DBC)
+		   (delete-char)
+		   (insert (format "\\GTpjG{4933}" ret))
+		   )
 		  ((and (encode-char chr '=ucs@jp)
 			(setq ret (char-representative-of-domain chr 'gb))
 			(setq ret (encode-char ret '=ucs@gb))