X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-conf.el;h=3533390af25cf64dc30885f2e71065685cf7b247;hb=a71101f05063a4be53c16e521da62ea9d53fa1c9;hp=b0f05da722b6fdf32de9f2c019eca8befd51b2b0;hpb=69211eb2c34990322cde813b54f49d1cc21018a0;p=chise%2Fxemacs-chise.git diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index b0f05da..3533390 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -4,7 +4,7 @@ ;; Licensed to the Free Software Foundation. ;; Copyright (C) 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2008, ;; 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2018, 2019, -;; 2020 MORIOKA Tomohiko +;; 2020, 2021, 2022 MORIOKA Tomohiko ;; Keywords: mule, multilingual, character set, coding system @@ -1940,6 +1940,17 @@ direction l2r)) (make-charset + '=>hanyo-denshi/tk + "TK (TouKi) part of Han'you-Denshi abstract characters" + `(long-name "Han'you-Denshi/TK" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =hanyo-denshi/tk)) + + (make-charset '==mj "Moji-Jouhou-Kiban detailed glyph-images." '(long-name "MJ glyph-images" @@ -2283,8 +2294,19 @@ direction l2r registry "HanyoDenshi\\.TKMF-1$")) (make-charset + '=>hanyo-denshi/tk/mf-01 + "font encoding for TK (TouKi) abstract characters" + `(long-name "Han'you-Denshi/TK font encoding" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =hanyo-denshi/tk/mf-01 + registry "HanyoDenshi\\.TKMF-1$")) + (make-charset '==hanyo-denshi/tk/mf-01 - "font encoding for TK (TouKi) characters" + "font encoding for TK (TouKi) glyphs" `(long-name "Han'you-Denshi/TK font encoding" chars 256 dimension 2 @@ -3502,7 +3524,77 @@ graphic 2 columns 2 direction l2r)) + (make-charset '===hng-kkd "HNG:金剛大教王經卷第二(高山寺本)" + '(long-name "HNG/院政大教" + chars 256 + dimension 2 + registry "hng-79$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===chise-hdic-tsj "HDIC-TSJ (新撰字鏡 天治本)" + '(long-name "CHISE-HDIC/TSJ" + chars 256 + dimension 2 + registry "chisetsj-0$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '=chise-hdic-tsj "HDIC-TSJ (新撰字鏡 天治本) abstract glyph" + '(long-name "CHISE-HDIC/TSJ" + chars 256 + dimension 2 + registry "chisetsj-0$" + graphic 2 + columns 2 + direction l2r + mother ===chise-hdic-tsj)) + + (make-charset '===chise-hdic-syp "HDIC-SYP (宋本玉篇)" + '(long-name "CHISE-HDIC/SYP" + chars 256 + dimension 2 + registry "chisesyp-0$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '=chise-hdic-syp "HDIC-SYP (宋本玉篇) abstract glyph" + '(long-name "CHISE-HDIC/SYP" + chars 256 + dimension 2 + registry "chisesyp-0$" + graphic 2 + columns 2 + direction l2r + mother ===chise-hdic-syp)) + + (make-charset '===chise-hdic-ktb "HDIC-KTB (篆隸萬象名義 高山寺本)" + '(long-name "CHISE-HDIC/KTB" + chars 256 + dimension 2 + registry "chisektb-0$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '=chise-hdic-ktb "HDIC-KTB (篆隸萬象名義 高山寺本) abstract glyph" + '(long-name "CHISE-HDIC/KTB" + chars 256 + dimension 2 + registry "chisektb-0$" + graphic 2 + columns 2 + direction l2r + mother ===chise-hdic-ktb)) + (make-charset '===chise-hdic-ktb-seal "Seal-script of HDIC-KTB (篆隸萬象名義 高山寺本)" + '(long-name "CHISE-HDIC/KTB-Seal" + chars 256 + dimension 2 + registry "chisektbs-0$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '=cbeta "CBETA private characters" '(long-name "CBETA PUA" chars 256 @@ -3643,6 +3735,16 @@ direction l2r registry "rui6-0" mother ==ruimoku-v6)) + (make-charset '=>>ruimoku-v6 + "RUIMOKU Version.6 detailed-glyphs." + '(long-name "RUI6 characters." + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "rui6-0" + mother =ruimoku-v6)) (make-charset '=>ruimoku-v6 "RUIMOKU Version.6 abstract characters." '(long-name "RUI6 characters." @@ -3653,7 +3755,6 @@ direction l2r registry "rui6-0" mother =ruimoku-v6)) - (define-charset-alias '=>>ruimoku-v6 '=>ruimoku-v6) (make-charset '=shuowen-jiguge "汲古閣本説文解字" '(long-name "汲古閣本説文解字(抽象字体)" @@ -3663,6 +3764,15 @@ graphic 2 columns 2 direction l2r)) + (make-charset '=>shuowen-jiguge "汲古閣本説文解字抽象文字" + '(long-name "汲古閣本説文解字(抽象文字)" + chars 256 + dimension 2 + registry "ShuowenJiguge-5$" + mother =shuowen-jiguge + graphic 2 + columns 2 + direction l2r)) (make-charset '===shuowen-jiguge4 "淮南書局4次様本説文解字" '(long-name "京大人文研所蔵説文解字淮南書局4次様本" @@ -3744,6 +3854,16 @@ direction l2r registry "cdp\\.itaiji-2$" mother =big5-cdp)) + (make-charset '=>big5-cdp-itaiji-002 + "Big5-CDP-itaiji-002 abstract characters of GlyphWiki" + '(long-name "Big5-CDP-itaiji-002" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "cdp\\.itaiji-2$" + mother =big5-cdp-itaiji-002)) (make-charset '=big5-cdp-itaiji-003 "Big5-CDP-itaiji-003 glyphs of GlyphWiki" @@ -3766,6 +3886,38 @@ registry "cdp\\.itaiji-3$" mother =big5-cdp-itaiji-003)) + (make-charset '=big5-cdp-itaiji-004 + "Big5-CDP-itaiji-004 glyphs of GlyphWiki" + '(long-name "Big5-CDP-itaiji-004" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "cdp\\.itaiji-4$" + mother =big5-cdp)) + (make-charset '=>big5-cdp-itaiji-004 + "Big5-CDP-itaiji-004 abstract characters of GlyphWiki" + '(long-name "Big5-CDP-itaiji-004" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "cdp\\.itaiji-4$" + mother =big5-cdp-itaiji-004)) + + (make-charset '=big5-cdp-itaiji-005 + "Big5-CDP-itaiji-005 glyphs of GlyphWiki" + '(long-name "Big5-CDP-itaiji-005" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "cdp\\.itaiji-5$" + mother =big5-cdp)) + (make-charset '=big5-cdp-var-001 "Big5-CDP-var-001 glyphs of GlyphWiki" '(long-name "Big5-CDP-var-001" @@ -3845,6 +3997,17 @@ registry "cdp\\.var-7$" mother =big5-cdp)) + (make-charset '=big5-cdp-var-008 + "Big5-CDP-var-008 glyph-images of GlyphWiki" + '(long-name "Big5-CDP-var-008" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "cdp\\.var-8$" + mother =big5-cdp)) + (make-charset '=big5-cdp-var-010 "Big5-CDP-var-010 glyph-images of GlyphWiki" '(long-name "Big5-CDP-var-010" @@ -4147,6 +4310,19 @@ direction l2r =>iso-ir 177 mother =ucs@unicode)) + (make-charset + '=ucs-sip@cns + "CNS glyphs of UCS SIP" + '(long-name "CNS SIP glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "ucs00\\.t-2$" + mother =ucs@cns + min-code #x20000 max-code #x2FFFF + code-offset #x20000)) (define-charset-alias 'ucs-cns '=ucs@cns) (make-charset '=ucs@cns/fw "ISO/IEC 10646 for CNS 11643 with fullwidth" @@ -4695,6 +4871,17 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.var001-0")) + (make-charset '==ucs-sip-var-001 + "uXXXX-var-001's abstract glyph-forms in SIP" + '(long-name "UCS-SIP-var-001 glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother ==ucs-var-001 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.var001-2")) (make-charset '=ucs-var-002 "uXXXX-var-002 glyph-images of GlyphWiki" @@ -4810,6 +4997,17 @@ mother =ucs-var-003 min-code #x20000 max-code #x2FFFF registry "ucs00\\.var003-2")) + (make-charset '=ucs-tip-var-003 + "uXXXX-var-003 glyph-images in TIP" + '(long-name "UCS-TIP-var-003" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =ucs-var-003 + min-code #x30000 max-code #x3FFFF + registry "ucs00\\.var003-3")) (make-charset '=+>ucs-var-003 "uXXXX-var-003's unified glyphs of GlyphWiki" '(long-name "UCS-var-003 unified glyphs" @@ -4833,6 +5031,40 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.var003-0")) + (make-charset '=+>ucs-tip-var-003 + "uXXXX-var-003 unified glyphs in TIP" + '(long-name "UCS-TIP-var-003 unified glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =+>ucs-var-003 + min-code #x30000 max-code #x3FFFF + registry "ucs00\\.var003-3")) + (make-charset '==ucs-var-003 + "Abstract glyph-forms corresponding with uXXXX-var-003 of GlyphWiki" + '(long-name "UCS-var-003" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-var-003)) + (make-charset '==ucs-bmp-var-003 + "uXXXX-var-003's abstract glyph-forms in BMP" + '(long-name "UCS-BMP-var-003 glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother ==ucs-var-003 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.var003-0")) (make-charset '=ucs-var-004 "uXXXX-var-004 glyph-images of GlyphWiki" @@ -4868,6 +5100,17 @@ mother =ucs-var-004 min-code #x20000 max-code #x2FFFF registry "ucs00\\.var004-2")) + (make-charset '=ucs-tip-var-004 + "uXXXX-var-004 glyph-images in TIP" + '(long-name "UCS-TIP-var-004" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =ucs-var-004 + min-code #x30000 max-code #x3FFFF + registry "ucs00\\.var004-3")) (make-charset '=ucs-var-005 "uXXXX-var-005 glyph-images of GlyphWiki" @@ -5009,6 +5252,17 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.var010-0")) + (make-charset '=ucs-sip-var-010 + "uXXXX-var-010 glyph-images in SIP" + '(long-name "UCS-SIP-var-010" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =ucs-var-010 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.var010-2")) (make-charset '=ucs-itaiji-001 "uXXXX-itaiji-001 glyphs of GlyphWiki" @@ -5089,6 +5343,17 @@ mother =>ucs-itaiji-001 min-code #x20000 max-code #x2FFFF registry "ucs00\\.itaiji001-2")) + (make-charset '=>ucs-tip-itaiji-001 + "uXXXX-itaiji-001 characters in TIP" + '(long-name "UCS-TIP-itaiji-001" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>ucs-itaiji-001 + min-code #x30000 max-code #x3FFFF + registry "ucs00\\.itaiji001-3")) (make-charset '==ucs-itaiji-001 "Abstract glyph-forms corresponding with uXXXX-itaiji-001 of GlyphWiki" '(long-name "UCS-itaiji-001" @@ -5283,6 +5548,17 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.itaiji002-0")) + (make-charset '=>ucs-sip-itaiji-002@iwds-1 + "IWDS-1 abstract characters of uXXXX-itaiji-002 in SIP" + '(long-name "=>ucs-itaiji-002@iwds-1 in SIP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>ucs-itaiji-002@iwds-1 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji002-2")) (make-charset '=ucs-itaiji-003 "uXXXX-itaiji-003 glyphs of GlyphWiki" @@ -5386,6 +5662,40 @@ mother ==ucs-itaiji-003 min-code #x20000 max-code #x2FFFF registry "ucs00\\.itaiji003-2")) + (make-charset '=>ucs-itaiji-003@iwds-1 + "uXXXX-itaiji-003's abstract characters based on IWDS-1" + '(long-name "IWDS-1 abstract characters of UCS-itaiji-003" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-003)) + (make-charset '=>ucs-bmp-itaiji-003@iwds-1 + "IWDS-1 abstract characters of UCS-itaiji-003 in BMP" + '(long-name "=>ucs-itaiji-003@iwds-1 in BMP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-003@iwds-1 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji003-0")) + (make-charset '=>ucs-sip-itaiji-003@iwds-1 + "IWDS-1 abstract characters of UCS-itaiji-003 in SIP" + '(long-name "=>ucs-itaiji-003@iwds-1 in SIP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>ucs-itaiji-003@iwds-1 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji003-2")) (make-charset '=ucs-itaiji-004 "uXXXX-itaiji-004 glyphs of GlyphWiki" @@ -5639,6 +5949,29 @@ mother =>ucs-itaiji-006 min-code #x20000 max-code #x2FFFF registry "ucs00\\.itaiji006-2")) + (make-charset '=>ucs-itaiji-006@iwds-1 + "uXXXX-itaiji-006's abstract characters based on IWDS-1" + '(long-name "IWDS-1 abstract characters of UCS-itaiji-006" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-006)) + (make-charset '=>ucs-bmp-itaiji-006@iwds-1 + "IWDS-1 abstract characters of UCS-itaiji-006 in BMP" + '(long-name "=>ucs-itaiji-006@iwds-1 in BMP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-006@iwds-1 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji006-0")) (make-charset '=ucs-itaiji-007 "uXXXX-itaiji-007 glyphs of GlyphWiki" @@ -5766,6 +6099,17 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.itaiji008-0")) + (make-charset '=>ucs-sip-itaiji-008 + "uXXXX-itaiji-008's abstract characters in SIP" + '(long-name "UCS-SIP-itaiji-008 characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>ucs-itaiji-008 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji008-2")) (make-charset '=ucs-itaiji-009 "uXXXX-itaiji-009 glyphs of GlyphWiki" @@ -5790,6 +6134,17 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.itaiji009-0")) + (make-charset '=ucs-sip-itaiji-009 + "uXXXX-itaiji-009 abstract glyphs in SIP" + '(long-name "UCS-SIP-itaiji-009" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =ucs-itaiji-009 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji009-2")) (make-charset '=>ucs-itaiji-009 "Abstract characters corresponding with uXXXX-itaiji-009 of GlyphWiki" '(long-name "UCS-itaiji-009" @@ -5942,6 +6297,145 @@ min-code #x2E00 max-code #x9FCC registry "ucs\\.itaiji012-0")) + (make-charset '=ucs-sip-itaiji-012 + "uXXXX-itaiji-012 glyphs in SIP" + '(long-name "UCS-SIP-itaiji-012" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =ucs-itaiji-012 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji012-2")) + (make-charset '=>ucs-itaiji-012 + "Abstract characters corresponding with uXXXX-itaiji-012 of GlyphWiki" + '(long-name "UCS-itaiji-012" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=>ucs-bmp-itaiji-012 + "uXXXX-itaiji-012's abstract characters in BMP" + '(long-name "UCS-BMP-itaiji-012 characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-012 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji012-0"))1 + (make-charset '=>ucs-sip-itaiji-012 + "uXXXX-itaiji-012's abstract characters in SIP" + '(long-name "UCS-SIP-itaiji-012 characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>ucs-itaiji-012 + min-code #x20000 max-code #x2FFFF + registry "ucs00\\.itaiji012-2")) + + (make-charset '=ucs-itaiji-014 + "uXXXX-itaiji-014 glyphs of GlyphWiki" + '(long-name "UCS-itaiji-014" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-itaiji-014 + "uXXXX-itaiji-014 glyph-images in BMP" + '(long-name "UCS-BMP-itaiji-014" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-itaiji-014 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji014-0")) + (make-charset '=>ucs-itaiji-014 + "Abstract characters corresponding with uXXXX-itaiji-014 of GlyphWiki" + '(long-name "UCS-itaiji-014" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=>ucs-bmp-itaiji-014 + "uXXXX-itaiji-014's abstract characters in BMP" + '(long-name "UCS-BMP-itaiji-014 characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-014 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji014-0")) + + (make-charset '=ucs-itaiji-016 + "uXXXX-itaiji-016 glyphs of GlyphWiki" + '(long-name "UCS-itaiji-016" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-itaiji-016 + "uXXXX-itaiji-016 glyph-images in BMP" + '(long-name "UCS-BMP-itaiji-016" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-itaiji-016 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji016-0")) + (make-charset '=>ucs-itaiji-016 + "Abstract characters corresponding with uXXXX-itaiji-016 of GlyphWiki" + '(long-name "UCS-itaiji-016" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=>ucs-bmp-itaiji-016 + "uXXXX-itaiji-016's abstract characters in BMP" + '(long-name "UCS-BMP-itaiji-016 characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =>ucs-itaiji-016 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji016-0")) (make-charset '=ucs-itaiji-084 "uXXXX-itaiji-084 glyph-images of GlyphWiki" @@ -6106,7 +6600,7 @@ registry "-ja-.*-ucs-0" mother =ucs@JP/hanazono min-code #x2E00 - max-code #x9FEA + max-code #x9FFC ;; max-code #xA4CF )) (make-charset