(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 (file)
--- 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))