Mercurial > emacs

comparison lisp/international/mule-conf.el @ 89050:c00be25be9ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Don't define the charset iso-8859-1 here, just setup its properties.
author Kenichi Handa <handa@m17n.org>
date Tue, 03 Sep 2002 04:05:26 +0000
parents 2ce9656d788b
children ec87f7e069f1
comparison
equal deleted inserted replaced
89049:aa9fa496b679 89050:c00be25be9ad
75 (put-charset-property 75 (put-charset-property
76 'ascii :short-name "ASCII") 76 'ascii :short-name "ASCII")
77 (put-charset-property 77 (put-charset-property
78 'ascii :long-name "ASCII (ISO646 IRV)") 78 'ascii :long-name "ASCII (ISO646 IRV)")
79 (put-charset-property 79 (put-charset-property
80 'iso-8859-1 :docstring "Latin-1 (ISO/IEC 8859-1)")
81 (put-charset-property
82 'iso-8859-1 :short-name "Latin-1")
83 (put-charset-property
84 'iso-8859-1 :long-name "Latin-1")
85 (put-charset-property
80 'unicode :docstring "Unicode (ISO10646)") 86 'unicode :docstring "Unicode (ISO10646)")
81 (put-charset-property 87 (put-charset-property
82 'unicode :short-name "Unicode") 88 'unicode :short-name "Unicode")
83 (put-charset-property 89 (put-charset-property
84 'unicode :long-name "Unicode (ISO10646)") 90 'unicode :long-name "Unicode (ISO10646)")
89 "Full Emacs characters" 95 "Full Emacs characters"
90 :ascii-compatible-p t 96 :ascii-compatible-p t
91 :code-space [ 0 255 0 255 0 63 ] 97 :code-space [ 0 255 0 255 0 63 ]
92 :code-offset 0 98 :code-offset 0
93 :supplementary-p t) 99 :supplementary-p t)
94
95 (define-charset 'iso-8859-1
96 "Latin-1 (ISO/IEC 8859-1)"
97 :short-name "Latin-1"
98 :ascii-compatible-p t
99 :code-space [0 255]
100 :code-offset 0)
101 100
102 (define-charset 'latin-iso8859-1 101 (define-charset 'latin-iso8859-1
103 "Right-Hand Part of ISO/IEC 8859/1 (Latin-1): ISO-IR-100" 102 "Right-Hand Part of ISO/IEC 8859/1 (Latin-1): ISO-IR-100"
104 :short-name "RHP of Latin-1" 103 :short-name "RHP of Latin-1"
105 :long-name "RHP of ISO/IEC 8859/1 (Latin-1): ISO-IR-100" 104 :long-name "RHP of ISO/IEC 8859/1 (Latin-1): ISO-IR-100"