From 6406d3e85669e209a387395e2282d45e5a414cf0 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Sun, 29 Dec 2013 21:58:13 +0900 Subject: [PATCH] (=ucs@iso): Use `=>>ucs@iso' instead of `=>>>ucs@iso' as the mother. (=>>>ucs@iso): Changed to an alias for `=ucs@iso'. --- lisp/mule/mule-conf.el | 25 ++++++++++++++----------- 1 file changed, 14 insertions(+), 11 deletions(-) diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index df7d7b8..2e4ae30 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -2693,16 +2693,16 @@ =>iso-ir 177 mother =>>ucs@unicode)) - (make-charset '=>>>ucs@iso - "Representative glyph-forms of ISO/IEC 10646" - '(long-name "UCS glyph-forms for UCS" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =>>ucs@iso)) + ;; (make-charset '=>>>ucs@iso + ;; "Representative glyph-forms of ISO/IEC 10646" + ;; '(long-name "UCS glyph-forms for UCS" + ;; chars 256 + ;; dimension 3 + ;; columns 2 + ;; graphic 2 + ;; direction l2r + ;; =>iso-ir 177 + ;; mother =>>ucs@iso)) ;; (make-charset '=>>>ucs@unicode ;; "Representative glyph-forms of Unicode" ;; '(long-name "UCS glyph-forms for Unicode" @@ -2783,7 +2783,10 @@ graphic 2 direction l2r =>iso-ir 177 - mother =>>>ucs@iso)) + mother =>>ucs@iso + ;; mother =>>>ucs@iso + )) + (define-charset-alias '=>>>ucs@iso '=ucs@iso) (make-charset '=ucs@unicode "Unicode for its representative glyphs" '(long-name "UCS for Unicode" -- 1.7.10.4