Mercurial > emacs
annotate lisp/language/european.el @ 32289:1c042b411eda
(list-options): Doc that you should use customize.
author | Dave Love <fx@gnu.org> |
---|---|
date | Sun, 08 Oct 2000 16:20:55 +0000 |
parents | 3362938ebbd7 |
children | fed8d1ebdc15 |
rev | line source |
---|---|
23158
5c0a4ed13900
Add coding: local variable, to avoid bootstrapping problem
Paul Eggert <eggert@twinsun.com>
parents:
23117
diff
changeset
|
1 ;;; european.el --- European languages -*- coding: iso-2022-7bit; -*- |
17052 | 2 |
18377
8b4a66c66dd6
Change copyright notice.
Richard M. Stallman <rms@gnu.org>
parents:
18309
diff
changeset
|
3 ;; Copyright (C) 1995, 1997 Electrotechnical Laboratory, JAPAN. |
8b4a66c66dd6
Change copyright notice.
Richard M. Stallman <rms@gnu.org>
parents:
18309
diff
changeset
|
4 ;; Licensed to the Free Software Foundation. |
17052 | 5 |
6 ;; Keywords: multilingual, European | |
7 | |
8 ;; This file is part of GNU Emacs. | |
9 | |
10 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
11 ;; it under the terms of the GNU General Public License as published by | |
12 ;; the Free Software Foundation; either version 2, or (at your option) | |
13 ;; any later version. | |
14 | |
15 ;; GNU Emacs is distributed in the hope that it will be useful, | |
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 ;; GNU General Public License for more details. | |
19 | |
20 ;; You should have received a copy of the GNU General Public License | |
17071 | 21 ;; along with GNU Emacs; see the file COPYING. If not, write to the |
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
23 ;; Boston, MA 02111-1307, USA. | |
17052 | 24 |
25 ;;; Commentary: | |
26 | |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
27 ;; For Europeans, character sets ISO8859-1,2,3,4,9,14,15 are supported. |
17052 | 28 |
29 ;;; Code: | |
30 | |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
31 ;; Latin-1 (ISO-8859-1) |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
32 |
17052 | 33 (make-coding-system |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
34 'iso-latin-1 2 ?1 |
23111
f72ce5154071
(iso-latin-1): Doc fix.
Richard M. Stallman <rms@gnu.org>
parents:
23050
diff
changeset
|
35 "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)" |
20743 | 36 '(ascii latin-iso8859-1 nil nil |
37 nil nil nil nil nil nil nil nil nil nil nil nil t) | |
38 '((safe-charsets ascii latin-iso8859-1) | |
39 (mime-charset . iso-8859-1))) | |
17052 | 40 |
18520
383d11185239
Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents:
18377
diff
changeset
|
41 (define-coding-system-alias 'iso-8859-1 'iso-latin-1) |
18622
fe2070df967e
(latin-1, latin-2. latin-3, latin-4, latin-5):
Richard M. Stallman <rms@gnu.org>
parents:
18543
diff
changeset
|
42 (define-coding-system-alias 'latin-1 'iso-latin-1) |
20743 | 43 |
44 (make-coding-system | |
45 'compound-text 2 ?1 | |
46 "ISO 2022 based encoding used in inter client communication of X" | |
30261
e1671c1d33d2
(compound-text): Force katakana-jisx0201 to be designated to G1.
Kenichi Handa <handa@m17n.org>
parents:
28906
diff
changeset
|
47 '((ascii t) (latin-iso8859-1 katakana-jisx0201 t) nil nil |
20743 | 48 nil ascii-eol ascii-cntl nil nil nil nil nil nil nil nil nil t) |
49 '((safe-charsets . t))) | |
50 | |
51 (define-coding-system-alias 'ctext 'compound-text) | |
17052 | 52 |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
53 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
54 "Latin-1" '((charset ascii latin-iso8859-1) |
20743 | 55 (coding-system iso-latin-1) |
56 (coding-priority iso-latin-1) | |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
57 (nonascii-translation . latin-iso8859-1) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
58 (unibyte-syntax . "latin-1") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
59 (unibyte-display . iso-latin-1) |
23050 | 60 (input-method . "latin-1-prefix") |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
61 (sample-text |
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
62 . "Hello, Hej, Tere, Hei, Bonjour, Gr,A|_(B Gott, Ciao, ,A!(BHola!") |
20743 | 63 (documentation . "\ |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
64 This language environment is a generic one for the Latin-1 (ISO-8859-1) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
65 character set which supports the following European languages: |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
66 Albanian, Basque, Breton, Catalan, Danish, Dutch, English, Faeroese, |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
67 Finnish, French (with restrictions -- see Latin-9), Frisian, Galician, |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
68 German, Greenlandic, Icelandic, Irish Gaelic (new orthography), |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
69 Italian, Latin, Luxemburgish, Norwegian, Portuguese, Rhaeto-Romanic, |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
70 Scottish Gaelic, Spanish, and Swedish. |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
71 We also have a German specific language environment \"German\". |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
72 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
73 Latin-1 also covers several written languages outside Europe, including |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
74 Indonesian/Malay, Tagalog (Philippines), Swahili and Afrikaans.")) |
20743 | 75 '("European")) |
76 | |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
77 |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
78 ;; Latin-2 (ISO-8859-2) |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
79 |
17052 | 80 (make-coding-system |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
81 'iso-latin-2 2 ?2 |
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
82 "ISO 2022 based 8-bit encoding (MIME:ISO-8859-2)" |
20743 | 83 '(ascii latin-iso8859-2 nil nil |
84 nil nil nil nil nil nil nil) | |
85 '((safe-charsets ascii latin-iso8859-2) | |
86 (mime-charset . iso-8859-2))) | |
17052 | 87 |
18520
383d11185239
Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents:
18377
diff
changeset
|
88 (define-coding-system-alias 'iso-8859-2 'iso-latin-2) |
18622
fe2070df967e
(latin-1, latin-2. latin-3, latin-4, latin-5):
Richard M. Stallman <rms@gnu.org>
parents:
18543
diff
changeset
|
89 (define-coding-system-alias 'latin-2 'iso-latin-2) |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
90 |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
91 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
92 "Latin-2" '((charset ascii latin-iso8859-2) |
20743 | 93 (coding-system iso-latin-2) |
94 (coding-priority iso-latin-2) | |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
95 (nonascii-translation . latin-iso8859-2) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
96 (unibyte-syntax . "latin-2") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
97 (unibyte-display . iso-latin-2) |
23050 | 98 (input-method . "latin-2-prefix") |
20743 | 99 (documentation . "\ |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
100 This language environment is a generic one for the Latin-2 (ISO-8859-2) |
23117
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
101 character set which supports the following languages: |
18117
5db3b24f2c5c
(iso-8859-1): Use `1' for mode line.
Richard M. Stallman <rms@gnu.org>
parents:
18069
diff
changeset
|
102 Albanian, Czech, English, German, Hungarian, Polish, Romanian, |
20232
5031189adff2
Add "Upper Sorbian" and "Lower Sorbian" in
Kenichi Handa <handa@m17n.org>
parents:
20159
diff
changeset
|
103 Serbo-Croatian or Croatian, Slovak, Slovene, Sorbian (upper and lower), |
23117
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
104 and Swedish. |
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
105 We also have specific language environments for the following languages: |
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
106 For Czech, \"Czech\". |
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
107 For Romanian, \"Romanian\". |
13247082e0ed
("Latin-1"): Modify `documentation' key value.
Kenichi Handa <handa@m17n.org>
parents:
23111
diff
changeset
|
108 For Slovak, \"Slovak\".")) |
20743 | 109 '("European")) |
110 | |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
111 |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
112 ;; Latin-3 (ISO-8859-3) |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
113 |
17052 | 114 (make-coding-system |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
115 'iso-latin-3 2 ?3 |
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
116 "ISO 2022 based 8-bit encoding (MIME:ISO-8859-3)" |
20743 | 117 '(ascii latin-iso8859-3 nil nil |
118 nil nil nil nil nil nil nil) | |
119 '((safe-charsets ascii latin-iso8859-3) | |
120 (mime-charset . iso-8859-3))) | |
17052 | 121 |
18520
383d11185239
Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents:
18377
diff
changeset
|
122 (define-coding-system-alias 'iso-8859-3 'iso-latin-3) |
18622
fe2070df967e
(latin-1, latin-2. latin-3, latin-4, latin-5):
Richard M. Stallman <rms@gnu.org>
parents:
18543
diff
changeset
|
123 (define-coding-system-alias 'latin-3 'iso-latin-3) |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
124 |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
125 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
126 "Latin-3" '((charset ascii latin-iso8859-3) |
20743 | 127 (coding-system iso-latin-3) |
128 (coding-priority iso-latin-3) | |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
129 (nonascii-translation . latin-iso8859-3) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
130 (unibyte-syntax . "latin-3") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
131 (unibyte-display . iso-latin-3) |
23050 | 132 (input-method . "latin-3-prefix") |
20743 | 133 (documentation . "\ |
18117
5db3b24f2c5c
(iso-8859-1): Use `1' for mode line.
Richard M. Stallman <rms@gnu.org>
parents:
18069
diff
changeset
|
134 These languages are supported with the Latin-3 (ISO-8859-3) character set: |
5db3b24f2c5c
(iso-8859-1): Use `1' for mode line.
Richard M. Stallman <rms@gnu.org>
parents:
18069
diff
changeset
|
135 Afrikaans, Catalan, Dutch, English, Esperanto, French, Galician, |
20743 | 136 German, Italian, Maltese, Spanish, and Turkish.")) |
137 '("European")) | |
138 | |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
139 |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
140 ;; Latin-4 (ISO-8859-4) |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
141 |
17052 | 142 (make-coding-system |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
143 'iso-latin-4 2 ?4 |
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
144 "ISO 2022 based 8-bit encoding (MIME:ISO-8859-4)" |
20743 | 145 '(ascii latin-iso8859-4 nil nil |
146 nil nil nil nil nil nil nil) | |
147 '((safe-charsets ascii latin-iso8859-4) | |
28702 | 148 (mime-charset . iso-8859-4))) |
17052 | 149 |
18520
383d11185239
Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents:
18377
diff
changeset
|
150 (define-coding-system-alias 'iso-8859-4 'iso-latin-4) |
18622
fe2070df967e
(latin-1, latin-2. latin-3, latin-4, latin-5):
Richard M. Stallman <rms@gnu.org>
parents:
18543
diff
changeset
|
151 (define-coding-system-alias 'latin-4 'iso-latin-4) |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
152 |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
153 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
154 "Latin-4" '((charset ascii latin-iso8859-4) |
20743 | 155 (coding-system iso-8859-4) |
156 (coding-priority iso-8859-4) | |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
157 (nonascii-translation . latin-iso8859-4) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
158 (unibyte-syntax . "latin-4") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
159 (unibyte-display . iso-8859-4) |
23050 | 160 (input-method . "latin-4-prefix") |
20743 | 161 (documentation . "\ |
18117
5db3b24f2c5c
(iso-8859-1): Use `1' for mode line.
Richard M. Stallman <rms@gnu.org>
parents:
18069
diff
changeset
|
162 These languages are supported with the Latin-4 (ISO-8859-4) character set: |
5db3b24f2c5c
(iso-8859-1): Use `1' for mode line.
Richard M. Stallman <rms@gnu.org>
parents:
18069
diff
changeset
|
163 Danish, English, Estonian, Finnish, German, Greenlandic, Lappish, |
20743 | 164 Latvian, Lithuanian, and Norwegian.")) |
165 '("European")) | |
166 | |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
167 |
18069
d6b58197bd69
Rename language environments from LatinN to Latin-N.
Richard M. Stallman <rms@gnu.org>
parents:
17993
diff
changeset
|
168 ;; Latin-5 (ISO-8859-9) |
17993
73869115ae0a
Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents:
17841
diff
changeset
|
169 |
17052 | 170 (make-coding-system |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
171 'iso-latin-5 2 ?9 |
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
172 "ISO 2022 based 8-bit encoding (MIME:ISO-8859-9)" |
20743 | 173 '(ascii latin-iso8859-9 nil nil |
174 nil nil nil nil nil nil nil) | |
175 '((safe-charsets ascii latin-iso8859-9) | |
176 (mime-charset . iso-8859-9))) | |
17052 | 177 |
18520
383d11185239
Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents:
18377
diff
changeset
|
178 (define-coding-system-alias 'iso-8859-9 'iso-latin-5) |
18622
fe2070df967e
(latin-1, latin-2. latin-3, latin-4, latin-5):
Richard M. Stallman <rms@gnu.org>
parents:
18543
diff
changeset
|
179 (define-coding-system-alias 'latin-5 'iso-latin-5) |
18203
0745f30aec66
Adjusted for coding system name change.
Kenichi Handa <handa@m17n.org>
parents:
18159
diff
changeset
|
180 |
17052 | 181 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
182 "Latin-5" '((charset ascii latin-iso8859-9) |
20743 | 183 (coding-system iso-latin-5) |
184 (coding-priority iso-latin-5) | |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
185 (nonascii-translation . latin-iso8859-9) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
186 (unibyte-syntax . "latin-5") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
187 (unibyte-display . iso-latin-5) |
23050 | 188 (input-method . "latin-5-prefix") |
20743 | 189 (documentation . "\ |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
190 These languages are supported with the Latin-5 (ISO-8859-9) character set: |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
191 Bulgarian, Byelorussian, (Slavic) Macedonian, Russian, Serbian and |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
192 Ukranian.")) ; says ISO 8859-1 |
20743 | 193 '("European")) |
194 | |
195 | |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
196 ;; Latin-8 (ISO-8859-14) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
197 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
198 (make-coding-system |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
199 'iso-latin-8 2 ?W ; `W' for `Welsh', since `C' |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
200 ; for `Celtic' is taken. |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
201 "ISO 2022 based 8-bit encoding for Latin-8 (MIME:ISO-8859-14)" |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
202 '(ascii latin-iso8859-14 nil nil |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
203 nil nil nil nil nil nil nil nil nil nil nil nil t) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
204 '((safe-charsets ascii latin-iso8859-14) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
205 (mime-charset . iso-8859-14))) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
206 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
207 (define-coding-system-alias 'iso-8859-14 'iso-latin-8) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
208 (define-coding-system-alias 'latin-8 'iso-latin-8) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
209 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
210 (set-language-info-alist |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
211 "Latin-8" '((charset ascii latin-iso8859-14) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
212 (coding-system iso-latin-8) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
213 (coding-priority iso-latin-8) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
214 (nonascii-translation . latin-iso8859-14) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
215 (unibyte-syntax . "latin-8") |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
216 (unibyte-display . iso-latin-8) |
31155
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
217 (input-method . "latin-8-prefix") |
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
218 ;; Fixme: Welsh/Ga{e}lic greetings |
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
219 (sample-text . ",_"(B ,_p(B ,_^(B") |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
220 (documentation . "\ |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
221 This language environment is a generic one for the Latin-8 (ISO-8859-14) |
31155
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
222 character set which supports the Celtic languages, including those not |
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
223 covered by other ISO-8859 character sets: Welsh, Manx Gaelic and |
26134 | 224 Irish Gaelic (old orthography).")) |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
225 '("European")) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
226 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
227 ;; Latin-9 (ISO-8859-15) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
228 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
229 (make-coding-system |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
230 'iso-latin-9 2 ?0 ; `0' for `Latin-0' |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
231 "ISO 2022 based 8-bit encoding for Latin-9 (MIME:ISO-8859-15)" |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
232 '(ascii latin-iso8859-15 nil nil |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
233 nil nil nil nil nil nil nil nil nil nil nil nil t) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
234 '((safe-charsets ascii latin-iso8859-15) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
235 (mime-charset . iso-8859-15))) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
236 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
237 (define-coding-system-alias 'iso-8859-15 'iso-latin-9) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
238 (define-coding-system-alias 'latin-9 'iso-latin-9) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
239 (define-coding-system-alias 'latin-0 'iso-latin-9) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
240 |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
241 (set-language-info-alist |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
242 "Latin-9" '((charset ascii latin-iso8859-15) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
243 (coding-system iso-latin-9) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
244 (coding-priority iso-latin-9) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
245 (nonascii-translation . latin-iso8859-15) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
246 (unibyte-syntax . "latin-9") |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
247 (unibyte-display . iso-latin-9) |
31155
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
248 (input-method . "latin-9-prefix") |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
249 (sample-text |
31155
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
250 . "AVE. ,b&(48<=>(B ,b$(B") |
26014
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
251 (documentation . "\ |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
252 This language environment is a generic one for the Latin-9 (ISO-8859-15) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
253 character set which supports the same languages as Latin-1 with the |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
254 addition of the Euro sign and some additional French and Finnish letters. |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
255 Latin-9 is sometimes nicknamed `Latin-0'.")) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
256 '("European")) |
e84e2bf4f9fb
Add Latin-8, Latin-9. Modify some doc
Dave Love <fx@gnu.org>
parents:
25773
diff
changeset
|
257 |
20743 | 258 (set-language-info-alist |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
259 "German" '((tutorial . "TUTORIAL.de") |
20743 | 260 (charset ascii latin-iso8859-1) |
261 (coding-system iso-latin-1) | |
262 (coding-priority iso-latin-1) | |
23050 | 263 (input-method . "german-postfix") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
264 (nonascii-translation . iso-latin-1) |
22726
e44440f1a80e
Define unibyte-syntax in each of these language environments.
Richard M. Stallman <rms@gnu.org>
parents:
22075
diff
changeset
|
265 (unibyte-syntax . "latin-1") |
22980
5681e7798ce9
(setup-8-bit-environment): Function deleted.
Kenichi Handa <handa@m17n.org>
parents:
22726
diff
changeset
|
266 (unibyte-display . iso-latin-1) |
20743 | 267 (sample-text . "\ |
268 German (Deutsch Nord) Guten Tag | |
269 German (Deutsch S,A|(Bd) Gr,A|_(B Gott") | |
270 (documentation . "\ | |
271 This language environment is almost the same as Latin-1, | |
272 but default input method is set to \"german-postfix\".")) | |
273 '("European")) | |
17302
1012d679efd4
English related codes are moved to
Kenichi Handa <handa@m17n.org>
parents:
17098
diff
changeset
|
274 |
24269
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
275 (set-language-info-alist |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
276 "Slovenian" '((charset . (ascii latin-iso8859-2)) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
277 (coding-system . (iso-8859-2)) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
278 (coding-priority . (iso-8859-2)) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
279 (nonascii-translation . latin-iso8859-2) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
280 (input-method . "latin-2-postfix") |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
281 (unibyte-syntax . "latin-2") |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
282 (unibyte-display . iso-8859-2) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
283 (tutorial . "TUTORIAL.sl") |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
284 (sample-text . ",B.(Belimo vam uspe,B9(Ben dan!") |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
285 (documentation . t)) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
286 '("European")) |
a29550b1d150
(setup-slovenian-environment): New function.
Richard M. Stallman <rms@gnu.org>
parents:
23158
diff
changeset
|
287 |
25773
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
288 ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
289 ;; before the introduction of ISO-8859-9 in 1988, ISO-8859-3 (Latin-3) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
290 ;; was used for Turkish. Those who use Latin-3 for Turkish should use |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
291 ;; "Latin-3" language environment. |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
292 |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
293 (set-language-info-alist |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
294 "Turkish" '((charset ascii latin-iso8859-9) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
295 (coding-system iso-latin-5) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
296 (coding-priority iso-latin-5) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
297 (nonascii-translation . latin-iso8859-9) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
298 (unibyte-syntax . "latin-5") |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
299 (unibyte-display . iso-latin-5) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
300 (input-method . "turkish-postfix") |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
301 (sample-text . "Turkish (T,M|(Brk,Mg(Be) Merhaba") |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
302 (documentation . t))) |
20234157d093
("Turkish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
25228
diff
changeset
|
303 |
28436
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
304 ;; Polish ISO 8859-2 environment. |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
305 ;; Maintainer: Wlodek Bzyl <matwb@univ.gda.pl> |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
306 ;; Keywords: multilingual, Polish |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
307 |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
308 (set-language-info-alist |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
309 "Polish" '((charset . (ascii latin-iso8859-2)) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
310 (coding-system . (iso-8859-2)) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
311 (coding-priority . (iso-8859-2)) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
312 (input-method . "polish-slash") |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
313 (nonascii-translation . latin-iso8859-2) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
314 (unibyte-syntax . "latin-2") |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
315 (unibyte-display . iso-8859-2) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
316 (tutorial . "TUTORIAL.pl") |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
317 (sample-text . ",B1!fFjJ3#qQsS6&?/<,(B") |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
318 (documentation . t)) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
319 '("European")) |
2dbedede8507
("Polish"): New language environment.
Kenichi Handa <handa@m17n.org>
parents:
26134
diff
changeset
|
320 |
31155
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
321 (provide 'european) |
3362938ebbd7
("Latin-8", "Latin-9"): Add input methods,
Dave Love <fx@gnu.org>
parents:
30261
diff
changeset
|
322 |
17052 | 323 ;;; european.el ends here |