From 1f9db0fb94b70d85ce9d18a0f3c131994eb41fed Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Mon, 3 Apr 2017 23:36:13 +0900 Subject: [PATCH] (==gt-pj-k1): New coded-charset for XEmacs CHISE. (==gt-pj-k2): Ditto. --- lisp/mule/mule-conf.el | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index 4983f60..f712834 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -2526,6 +2526,16 @@ registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$")) (define-charset-alias 'ideograph-gt-pj-k1 '=gt-pj-k1) (make-charset + '==gt-pj-k1 + "Ideographic parts of GT (pseudo JIS encoding) part 1" + '(long-name "GT K1" + chars 94 + dimension 2 + columns 2 + graphic 0 + direction l2r + registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$")) + (make-charset '=gt-pj-k2 "Ideographic parts of GT (pseudo JIS encoding) part 2" '(long-name "GT K2" @@ -2536,6 +2546,16 @@ direction l2r registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$")) (define-charset-alias 'ideograph-gt-pj-k2 '=gt-pj-k2) + (make-charset + '==gt-pj-k2 + "Ideographic parts of GT (pseudo JIS encoding) part 2" + '(long-name "GT K2" + chars 94 + dimension 2 + columns 2 + graphic 0 + direction l2r + registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$")) (make-charset '=daikanwa "Daikanwa dictionary (unchanged part)" -- 1.7.10.4