From 6ab092fca582fcec1dfae428923b5783668c5f4f Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 28 Apr 2010 10:06:01 +0000 Subject: [PATCH] (=ucs@big5): Use `=>>ucs@unicode' instead of `=ucs@unicode' as the mother. --- lisp/mule/mule-conf.el | 36 ++++++++++++++++++------------------ 1 file changed, 18 insertions(+), 18 deletions(-) diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index e620898..0e30a04 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -947,48 +947,48 @@ mother =ucs@ks min-code #x0000 max-code #xFFFF)) - (make-charset '=ucs@big5 - "ISO/IEC 10646 for Big5" - '(long-name "UCS for Big5" + (make-charset '=ucs@cns11643 + "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw" + '(long-name "UCS for CNS11643" chars 256 dimension 3 columns 2 graphic 2 direction l2r =>iso-ir 177 - mother =ucs@unicode)) - (define-charset-alias 'ucs-big5 '=ucs@big5) - (make-charset '=ucs@big5/cns11643 - "ISO/IEC 10646 for Big5 based on www.cns11643.gov.tw" - '(long-name "UCS for Big5@CNS11643" + mother =ucs@cns)) + + (make-charset '=>>ucs@unicode + "Representative abstract glyphs of Unicode" + '(long-name "Unicode abstract glyphs" chars 256 dimension 3 columns 2 graphic 2 direction l2r =>iso-ir 177 - mother =ucs@big5)) - (make-charset '=ucs@cns11643 - "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw" - '(long-name "UCS for CNS11643" + mother =ucs@unicode)) + (make-charset '=ucs@big5 + "ISO/IEC 10646 for Big5" + '(long-name "UCS for Big5" chars 256 dimension 3 columns 2 graphic 2 direction l2r =>iso-ir 177 - mother =ucs@cns)) - - (make-charset '=>>ucs@unicode - "Representative abstract glyphs of Unicode" - '(long-name "Unicode abstract glyphs" + mother =>>ucs@unicode)) + (define-charset-alias 'ucs-big5 '=ucs@big5) + (make-charset '=ucs@big5/cns11643 + "ISO/IEC 10646 for Big5 based on www.cns11643.gov.tw" + '(long-name "UCS for Big5@CNS11643" chars 256 dimension 3 columns 2 graphic 2 direction l2r =>iso-ir 177 - mother =ucs@unicode)) + mother =ucs@big5)) (make-charset '=ucs-radicals -- 1.7.10.4