From 3cbeacd1ae443d2dd3d7c21511d7f89a2eb32151 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 20 Aug 2002 08:32:23 +0000 Subject: [PATCH] (coded-charset-entity-reference-alist): Add definitions for isolated-chars. --- lisp/mule/mule-coding.el | 39 ++++++++++++++++++++++++++------------- 1 file changed, 26 insertions(+), 13 deletions(-) diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el index e2a8841..3bb7c5a 100644 --- a/lisp/mule/mule-coding.el +++ b/lisp/mule/mule-coding.el @@ -173,19 +173,32 @@ (when (featurep 'utf-2000) (setq coded-charset-entity-reference-alist - '((chinese-big5-cdp "CDP-" 4 X) - (ideograph-daikanwa "M-" 5 d) - (ideograph-cbeta "CB" 5 d) - (ideograph-gt "GT-" 5 d) - (japanese-jisx0208-1990 "J90-" 4 X) - (japanese-jisx0208 "J83-" 4 X) - (chinese-cns11643-1 "C1-" 4 X) - (chinese-cns11643-2 "C2-" 4 X) - (chinese-cns11643-3 "C3-" 4 X) - (chinese-cns11643-4 "C4-" 4 X) - (chinese-cns11643-5 "C5-" 4 X) - (chinese-cns11643-6 "C6-" 4 X) - (chinese-cns11643-7 "C7-" 4 X) + '(((chinese-big5-cdp . isolated) "I-CDP-" 4 X) + ( chinese-big5-cdp "CDP-" 4 X) + ((ideograph-daikanwa . isolated) "I-M-" 5 d) + ( ideograph-daikanwa "M-" 5 d) + ((ideograph-cbeta . isolated) "I-CB" 5 d) + ( ideograph-cbeta "CB" 5 d) + ((ideograph-gt . isolated) "I-GT-" 5 d) + ( ideograph-gt "GT-" 5 d) + ((japanese-jisx0208-1990 . isolated) "I-J90-" 4 X) + ( japanese-jisx0208-1990 "J90-" 4 X) + ((japanese-jisx0208 . isolated) "I-J83-" 4 X) + ( japanese-jisx0208 "J83-" 4 X) + ((chinese-cns11643-1 . isolated) "I-C1-" 4 X) + ( chinese-cns11643-1 "C1-" 4 X) + ((chinese-cns11643-2 . isolated) "I-C2-" 4 X) + ( chinese-cns11643-2 "C2-" 4 X) + ((chinese-cns11643-3 . isolated) "I-C3-" 4 X) + ( chinese-cns11643-3 "C3-" 4 X) + ((chinese-cns11643-4 . isolated) "I-C4-" 4 X) + ( chinese-cns11643-4 "C4-" 4 X) + ((chinese-cns11643-5 . isolated) "I-C5-" 4 X) + ( chinese-cns11643-5 "C5-" 4 X) + ((chinese-cns11643-6 . isolated) "I-C6-" 4 X) + ( chinese-cns11643-6 "C6-" 4 X) + ((chinese-cns11643-7 . isolated) "I-C7-" 4 X) + ( chinese-cns11643-7 "C7-" 4 X) )) (make-coding-system -- 1.7.10.4