aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero2003-02-18 11:06:02 +0000
committerJuanma Barranquero2003-02-18 11:06:02 +0000
commite29bddc1a59df6a79a8e2e695110c7ed6565ac6b (patch)
tree703008af8e1f31afb393fdf5a29d64b771b78761 /lisp
parent8afb8b29ff1107e780a3f3b5bf14b29d1b41aec0 (diff)
downloademacs-e29bddc1a59df6a79a8e2e695110c7ed6565ac6b.tar.gz
emacs-e29bddc1a59df6a79a8e2e695110c7ed6565ac6b.zip
(standard-display-cyrillic-translit): Fix character constants.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/language/cyril-util.el172
1 files changed, 86 insertions, 86 deletions
diff --git a/lisp/language/cyril-util.el b/lisp/language/cyril-util.el
index 3c9839eea21..ed9125aa03f 100644
--- a/lisp/language/cyril-util.el
+++ b/lisp/language/cyril-util.el
@@ -86,8 +86,8 @@ If the argument is nil, we return the display table to its standard state."
86 (aset standard-display-table ?,LS(B [?g]) 86 (aset standard-display-table ?,LS(B [?g])
87 (aset standard-display-table ?,LT(B [?d]) 87 (aset standard-display-table ?,LT(B [?d])
88 (aset standard-display-table ?,LU(B [?e]) 88 (aset standard-display-table ?,LU(B [?e])
89 (aset standard-display-table ?,Lq(B [?y?o]) 89 (aset standard-display-table ?,Lq(B [?y ?o])
90 (aset standard-display-table ?,LV(B [?z?h]) 90 (aset standard-display-table ?,LV(B [?z ?h])
91 (aset standard-display-table ?,LW(B [?z]) 91 (aset standard-display-table ?,LW(B [?z])
92 (aset standard-display-table ?,LX(B [?i]) 92 (aset standard-display-table ?,LX(B [?i])
93 (aset standard-display-table ?,LY(B [?j]) 93 (aset standard-display-table ?,LY(B [?j])
@@ -102,17 +102,17 @@ If the argument is nil, we return the display table to its standard state."
102 (aset standard-display-table ?,Lb(B [?t]) 102 (aset standard-display-table ?,Lb(B [?t])
103 (aset standard-display-table ?,Lc(B [?u]) 103 (aset standard-display-table ?,Lc(B [?u])
104 (aset standard-display-table ?,Ld(B [?f]) 104 (aset standard-display-table ?,Ld(B [?f])
105 (aset standard-display-table ?,Le(B [?k?h]) 105 (aset standard-display-table ?,Le(B [?k ?h])
106 (aset standard-display-table ?,Lf(B [?t?s]) 106 (aset standard-display-table ?,Lf(B [?t ?s])
107 (aset standard-display-table ?,Lg(B [?c?h]) 107 (aset standard-display-table ?,Lg(B [?c ?h])
108 (aset standard-display-table ?,Lh(B [?s?h]) 108 (aset standard-display-table ?,Lh(B [?s ?h])
109 (aset standard-display-table ?,Li(B [?s?c?h]) 109 (aset standard-display-table ?,Li(B [?s ?c ?h])
110 (aset standard-display-table ?,Lj(B [?~]) 110 (aset standard-display-table ?,Lj(B [?~])
111 (aset standard-display-table ?,Lk(B [?y]) 111 (aset standard-display-table ?,Lk(B [?y])
112 (aset standard-display-table ?,Ll(B [?']) 112 (aset standard-display-table ?,Ll(B [?'])
113 (aset standard-display-table ?,Lm(B [?e?']) 113 (aset standard-display-table ?,Lm(B [?e ?'])
114 (aset standard-display-table ?,Ln(B [?y?u]) 114 (aset standard-display-table ?,Ln(B [?y ?u])
115 (aset standard-display-table ?,Lo(B [?y?a]) 115 (aset standard-display-table ?,Lo(B [?y ?a])
116 116
117 (aset standard-display-table ?,L0(B [?A]) 117 (aset standard-display-table ?,L0(B [?A])
118 (aset standard-display-table ?,L1(B [?B]) 118 (aset standard-display-table ?,L1(B [?B])
@@ -120,8 +120,8 @@ If the argument is nil, we return the display table to its standard state."
120 (aset standard-display-table ?,L3(B [?G]) 120 (aset standard-display-table ?,L3(B [?G])
121 (aset standard-display-table ?,L4(B [?D]) 121 (aset standard-display-table ?,L4(B [?D])
122 (aset standard-display-table ?,L5(B [?E]) 122 (aset standard-display-table ?,L5(B [?E])
123 (aset standard-display-table ?,L!(B [?Y?o]) 123 (aset standard-display-table ?,L!(B [?Y ?o])
124 (aset standard-display-table ?,L6(B [?Z?h]) 124 (aset standard-display-table ?,L6(B [?Z ?h])
125 (aset standard-display-table ?,L7(B [?Z]) 125 (aset standard-display-table ?,L7(B [?Z])
126 (aset standard-display-table ?,L8(B [?I]) 126 (aset standard-display-table ?,L8(B [?I])
127 (aset standard-display-table ?,L9(B [?J]) 127 (aset standard-display-table ?,L9(B [?J])
@@ -136,45 +136,45 @@ If the argument is nil, we return the display table to its standard state."
136 (aset standard-display-table ?,LB(B [?T]) 136 (aset standard-display-table ?,LB(B [?T])
137 (aset standard-display-table ?,LC(B [?U]) 137 (aset standard-display-table ?,LC(B [?U])
138 (aset standard-display-table ?,LD(B [?F]) 138 (aset standard-display-table ?,LD(B [?F])
139 (aset standard-display-table ?,LE(B [?K?h]) 139 (aset standard-display-table ?,LE(B [?K ?h])
140 (aset standard-display-table ?,LF(B [?T?s]) 140 (aset standard-display-table ?,LF(B [?T ?s])
141 (aset standard-display-table ?,LG(B [?C?h]) 141 (aset standard-display-table ?,LG(B [?C ?h])
142 (aset standard-display-table ?,LH(B [?S?h]) 142 (aset standard-display-table ?,LH(B [?S ?h])
143 (aset standard-display-table ?,LI(B [?S?c?h]) 143 (aset standard-display-table ?,LI(B [?S ?c ?h])
144 (aset standard-display-table ?,LJ(B [?~]) 144 (aset standard-display-table ?,LJ(B [?~])
145 (aset standard-display-table ?,LK(B [?Y]) 145 (aset standard-display-table ?,LK(B [?Y])
146 (aset standard-display-table ?,LL(B [?']) 146 (aset standard-display-table ?,LL(B [?'])
147 (aset standard-display-table ?,LM(B [?E?']) 147 (aset standard-display-table ?,LM(B [?E ?'])
148 (aset standard-display-table ?,LN(B [?Y?u]) 148 (aset standard-display-table ?,LN(B [?Y ?u])
149 (aset standard-display-table ?,LO(B [?Y?a]) 149 (aset standard-display-table ?,LO(B [?Y ?a])
150 150
151 (aset standard-display-table ?,Lt(B [?i?e]) 151 (aset standard-display-table ?,Lt(B [?i ?e])
152 (aset standard-display-table ?,Lw(B [?i]) 152 (aset standard-display-table ?,Lw(B [?i])
153 (aset standard-display-table ?,L~(B [?u]) 153 (aset standard-display-table ?,L~(B [?u])
154 (aset standard-display-table ?,Lr(B [?d?j]) 154 (aset standard-display-table ?,Lr(B [?d ?j])
155 (aset standard-display-table ?,L{(B [?c?h?j]) 155 (aset standard-display-table ?,L{(B [?c ?h ?j])
156 (aset standard-display-table ?,Ls(B [?g?j]) 156 (aset standard-display-table ?,Ls(B [?g ?j])
157 (aset standard-display-table ?,Lu(B [?s]) 157 (aset standard-display-table ?,Lu(B [?s])
158 (aset standard-display-table ?,L|(B [?k]) 158 (aset standard-display-table ?,L|(B [?k])
159 (aset standard-display-table ?,Lv(B [?i]) 159 (aset standard-display-table ?,Lv(B [?i])
160 (aset standard-display-table ?,Lx(B [?j]) 160 (aset standard-display-table ?,Lx(B [?j])
161 (aset standard-display-table ?,Ly(B [?l?j]) 161 (aset standard-display-table ?,Ly(B [?l ?j])
162 (aset standard-display-table ?,Lz(B [?n?j]) 162 (aset standard-display-table ?,Lz(B [?n ?j])
163 (aset standard-display-table ?,L(B [?d?z]) 163 (aset standard-display-table ?,L(B [?d ?z])
164 164
165 (aset standard-display-table ?,L$(B [?Y?e]) 165 (aset standard-display-table ?,L$(B [?Y ?e])
166 (aset standard-display-table ?,L'(B [?Y?i]) 166 (aset standard-display-table ?,L'(B [?Y ?i])
167 (aset standard-display-table ?,L.(B [?U]) 167 (aset standard-display-table ?,L.(B [?U])
168 (aset standard-display-table ?,L"(B [?D?j]) 168 (aset standard-display-table ?,L"(B [?D ?j])
169 (aset standard-display-table ?,L+(B [?C?h?j]) 169 (aset standard-display-table ?,L+(B [?C ?h ?j])
170 (aset standard-display-table ?,L#(B [?G?j]) 170 (aset standard-display-table ?,L#(B [?G ?j])
171 (aset standard-display-table ?,L%(B [?S]) 171 (aset standard-display-table ?,L%(B [?S])
172 (aset standard-display-table ?,L,(B [?K]) 172 (aset standard-display-table ?,L,(B [?K])
173 (aset standard-display-table ?,L&(B [?I]) 173 (aset standard-display-table ?,L&(B [?I])
174 (aset standard-display-table ?,L((B [?J]) 174 (aset standard-display-table ?,L((B [?J])
175 (aset standard-display-table ?,L)(B [?L?j]) 175 (aset standard-display-table ?,L)(B [?L ?j])
176 (aset standard-display-table ?,L*(B [?N?j]) 176 (aset standard-display-table ?,L*(B [?N ?j])
177 (aset standard-display-table ?,L/(B [?D?j]) 177 (aset standard-display-table ?,L/(B [?D ?j])
178 178
179 ;; Unicode version: 179 ;; Unicode version:
180 (aset standard-display-table ?$,1(P(B [?a]) 180 (aset standard-display-table ?$,1(P(B [?a])
@@ -183,8 +183,8 @@ If the argument is nil, we return the display table to its standard state."
183 (aset standard-display-table ?$,1(S(B [?g]) 183 (aset standard-display-table ?$,1(S(B [?g])
184 (aset standard-display-table ?$,1(T(B [?d]) 184 (aset standard-display-table ?$,1(T(B [?d])
185 (aset standard-display-table ?$,1(U(B [?e]) 185 (aset standard-display-table ?$,1(U(B [?e])
186 (aset standard-display-table ?$,1(q(B [?y?o]) 186 (aset standard-display-table ?$,1(q(B [?y ?o])
187 (aset standard-display-table ?$,1(V(B [?z?h]) 187 (aset standard-display-table ?$,1(V(B [?z ?h])
188 (aset standard-display-table ?$,1(W(B [?z]) 188 (aset standard-display-table ?$,1(W(B [?z])
189 (aset standard-display-table ?$,1(X(B [?i]) 189 (aset standard-display-table ?$,1(X(B [?i])
190 (aset standard-display-table ?$,1(Y(B [?j]) 190 (aset standard-display-table ?$,1(Y(B [?j])
@@ -199,17 +199,17 @@ If the argument is nil, we return the display table to its standard state."
199 (aset standard-display-table ?$,1(b(B [?t]) 199 (aset standard-display-table ?$,1(b(B [?t])
200 (aset standard-display-table ?$,1(c(B [?u]) 200 (aset standard-display-table ?$,1(c(B [?u])
201 (aset standard-display-table ?$,1(d(B [?f]) 201 (aset standard-display-table ?$,1(d(B [?f])
202 (aset standard-display-table ?$,1(e(B [?k?h]) 202 (aset standard-display-table ?$,1(e(B [?k ?h])
203 (aset standard-display-table ?$,1(f(B [?t?s]) 203 (aset standard-display-table ?$,1(f(B [?t ?s])
204 (aset standard-display-table ?$,1(g(B [?c?h]) 204 (aset standard-display-table ?$,1(g(B [?c ?h])
205 (aset standard-display-table ?$,1(h(B [?s?h]) 205 (aset standard-display-table ?$,1(h(B [?s ?h])
206 (aset standard-display-table ?$,1(i(B [?s?c?h]) 206 (aset standard-display-table ?$,1(i(B [?s ?c ?h])
207 (aset standard-display-table ?$,1(j(B [?~]) 207 (aset standard-display-table ?$,1(j(B [?~])
208 (aset standard-display-table ?$,1(k(B [?y]) 208 (aset standard-display-table ?$,1(k(B [?y])
209 (aset standard-display-table ?$,1(l(B [?']) 209 (aset standard-display-table ?$,1(l(B [?'])
210 (aset standard-display-table ?$,1(m(B [?e?']) 210 (aset standard-display-table ?$,1(m(B [?e ?'])
211 (aset standard-display-table ?$,1(n(B [?y?u]) 211 (aset standard-display-table ?$,1(n(B [?y ?u])
212 (aset standard-display-table ?$,1(o(B [?y?a]) 212 (aset standard-display-table ?$,1(o(B [?y ?a])
213 213
214 (aset standard-display-table ?$,1(0(B [?A]) 214 (aset standard-display-table ?$,1(0(B [?A])
215 (aset standard-display-table ?$,1(1(B [?B]) 215 (aset standard-display-table ?$,1(1(B [?B])
@@ -217,8 +217,8 @@ If the argument is nil, we return the display table to its standard state."
217 (aset standard-display-table ?$,1(3(B [?G]) 217 (aset standard-display-table ?$,1(3(B [?G])
218 (aset standard-display-table ?$,1(4(B [?D]) 218 (aset standard-display-table ?$,1(4(B [?D])
219 (aset standard-display-table ?$,1(5(B [?E]) 219 (aset standard-display-table ?$,1(5(B [?E])
220 (aset standard-display-table ?$,1(!(B [?Y?o]) 220 (aset standard-display-table ?$,1(!(B [?Y ?o])
221 (aset standard-display-table ?$,1(6(B [?Z?h]) 221 (aset standard-display-table ?$,1(6(B [?Z ?h])
222 (aset standard-display-table ?$,1(7(B [?Z]) 222 (aset standard-display-table ?$,1(7(B [?Z])
223 (aset standard-display-table ?$,1(8(B [?I]) 223 (aset standard-display-table ?$,1(8(B [?I])
224 (aset standard-display-table ?$,1(9(B [?J]) 224 (aset standard-display-table ?$,1(9(B [?J])
@@ -233,60 +233,60 @@ If the argument is nil, we return the display table to its standard state."
233 (aset standard-display-table ?$,1(B(B [?T]) 233 (aset standard-display-table ?$,1(B(B [?T])
234 (aset standard-display-table ?$,1(C(B [?U]) 234 (aset standard-display-table ?$,1(C(B [?U])
235 (aset standard-display-table ?$,1(D(B [?F]) 235 (aset standard-display-table ?$,1(D(B [?F])
236 (aset standard-display-table ?$,1(E(B [?K?h]) 236 (aset standard-display-table ?$,1(E(B [?K ?h])
237 (aset standard-display-table ?$,1(F(B [?T?s]) 237 (aset standard-display-table ?$,1(F(B [?T ?s])
238 (aset standard-display-table ?$,1(G(B [?C?h]) 238 (aset standard-display-table ?$,1(G(B [?C ?h])
239 (aset standard-display-table ?$,1(H(B [?S?h]) 239 (aset standard-display-table ?$,1(H(B [?S ?h])
240 (aset standard-display-table ?$,1(I(B [?S?c?h]) 240 (aset standard-display-table ?$,1(I(B [?S ?c ?h])
241 (aset standard-display-table ?$,1(J(B [?~]) 241 (aset standard-display-table ?$,1(J(B [?~])
242 (aset standard-display-table ?$,1(K(B [?Y]) 242 (aset standard-display-table ?$,1(K(B [?Y])
243 (aset standard-display-table ?$,1(L(B [?']) 243 (aset standard-display-table ?$,1(L(B [?'])
244 (aset standard-display-table ?$,1(M(B [?E?']) 244 (aset standard-display-table ?$,1(M(B [?E ?'])
245 (aset standard-display-table ?$,1(N(B [?Y?u]) 245 (aset standard-display-table ?$,1(N(B [?Y ?u])
246 (aset standard-display-table ?$,1(O(B [?Y?a]) 246 (aset standard-display-table ?$,1(O(B [?Y ?a])
247 247
248 (aset standard-display-table ?$,1(t(B [?i?e]) 248 (aset standard-display-table ?$,1(t(B [?i ?e])
249 (aset standard-display-table ?$,1(w(B [?i]) 249 (aset standard-display-table ?$,1(w(B [?i])
250 (aset standard-display-table ?$,1(~(B [?u]) 250 (aset standard-display-table ?$,1(~(B [?u])
251 (aset standard-display-table ?$,1(r(B [?d?j]) 251 (aset standard-display-table ?$,1(r(B [?d ?j])
252 (aset standard-display-table ?$,1({(B [?c?h?j]) 252 (aset standard-display-table ?$,1({(B [?c ?h ?j])
253 (aset standard-display-table ?$,1(s(B [?g?j]) 253 (aset standard-display-table ?$,1(s(B [?g ?j])
254 (aset standard-display-table ?$,1(u(B [?s]) 254 (aset standard-display-table ?$,1(u(B [?s])
255 (aset standard-display-table ?$,1(|(B [?k]) 255 (aset standard-display-table ?$,1(|(B [?k])
256 (aset standard-display-table ?$,1(v(B [?i]) 256 (aset standard-display-table ?$,1(v(B [?i])
257 (aset standard-display-table ?$,1(x(B [?j]) 257 (aset standard-display-table ?$,1(x(B [?j])
258 (aset standard-display-table ?$,1(y(B [?l?j]) 258 (aset standard-display-table ?$,1(y(B [?l ?j])
259 (aset standard-display-table ?$,1(z(B [?n?j]) 259 (aset standard-display-table ?$,1(z(B [?n ?j])
260 (aset standard-display-table ?$,1((B [?d?z]) 260 (aset standard-display-table ?$,1((B [?d ?z])
261 261
262 (aset standard-display-table ?$,1($(B [?Y?e]) 262 (aset standard-display-table ?$,1($(B [?Y ?e])
263 (aset standard-display-table ?$,1('(B [?Y?i]) 263 (aset standard-display-table ?$,1('(B [?Y ?i])
264 (aset standard-display-table ?$,1(.(B [?U]) 264 (aset standard-display-table ?$,1(.(B [?U])
265 (aset standard-display-table ?$,1("(B [?D?j]) 265 (aset standard-display-table ?$,1("(B [?D ?j])
266 (aset standard-display-table ?$,1(+(B [?C?h?j]) 266 (aset standard-display-table ?$,1(+(B [?C ?h ?j])
267 (aset standard-display-table ?$,1(#(B [?G?j]) 267 (aset standard-display-table ?$,1(#(B [?G ?j])
268 (aset standard-display-table ?$,1(%(B [?S]) 268 (aset standard-display-table ?$,1(%(B [?S])
269 (aset standard-display-table ?$,1(,(B [?K]) 269 (aset standard-display-table ?$,1(,(B [?K])
270 (aset standard-display-table ?$,1(&(B [?I]) 270 (aset standard-display-table ?$,1(&(B [?I])
271 (aset standard-display-table ?$,1(((B [?J]) 271 (aset standard-display-table ?$,1(((B [?J])
272 (aset standard-display-table ?$,1()(B [?L?j]) 272 (aset standard-display-table ?$,1()(B [?L ?j])
273 (aset standard-display-table ?$,1(*(B [?N?j]) 273 (aset standard-display-table ?$,1(*(B [?N ?j])
274 (aset standard-display-table ?$,1(/(B [?D?j]) 274 (aset standard-display-table ?$,1(/(B [?D ?j])
275 275
276 (when (equal cyrillic-language "Bulgarian") 276 (when (equal cyrillic-language "Bulgarian")
277 (aset standard-display-table ?,Li(B [?s?h?t]) 277 (aset standard-display-table ?,Li(B [?s ?h ?t])
278 (aset standard-display-table ?,LI(B [?S?h?t]) 278 (aset standard-display-table ?,LI(B [?S ?h ?t])
279 (aset standard-display-table ?,Ln(B [?i?u]) 279 (aset standard-display-table ?,Ln(B [?i ?u])
280 (aset standard-display-table ?,LN(B [?I?u]) 280 (aset standard-display-table ?,LN(B [?I ?u])
281 (aset standard-display-table ?,Lo(B [?i?a]) 281 (aset standard-display-table ?,Lo(B [?i ?a])
282 (aset standard-display-table ?,LO(B [?I?a]) 282 (aset standard-display-table ?,LO(B [?I ?a])
283 ;; Unicode version: 283 ;; Unicode version:
284 (aset standard-display-table ?$,1(i(B [?s?h?t]) 284 (aset standard-display-table ?$,1(i(B [?s ?h ?t])
285 (aset standard-display-table ?$,1(I(B [?S?h?t]) 285 (aset standard-display-table ?$,1(I(B [?S ?h ?t])
286 (aset standard-display-table ?$,1(n(B [?i?u]) 286 (aset standard-display-table ?$,1(n(B [?i ?u])
287 (aset standard-display-table ?$,1(N(B [?I?u]) 287 (aset standard-display-table ?$,1(N(B [?I ?u])
288 (aset standard-display-table ?$,1(o(B [?i?a]) 288 (aset standard-display-table ?$,1(o(B [?i ?a])
289 (aset standard-display-table ?$,1(O(B [?I?a])) 289 (aset standard-display-table ?$,1(O(B [?I ?a]))
290 290
291 (when (equal cyrillic-language "Ukrainian") ; based on the official 291 (when (equal cyrillic-language "Ukrainian") ; based on the official
292 ; transliteration table 292 ; transliteration table
@@ -294,15 +294,15 @@ If the argument is nil, we return the display table to its standard state."
294 (aset standard-display-table ?,L8(B [?Y]) 294 (aset standard-display-table ?,L8(B [?Y])
295 (aset standard-display-table ?,LY(B [?i]) 295 (aset standard-display-table ?,LY(B [?i])
296 (aset standard-display-table ?,L9(B [?Y]) 296 (aset standard-display-table ?,L9(B [?Y])
297 (aset standard-display-table ?,Ln(B [?i?u]) 297 (aset standard-display-table ?,Ln(B [?i ?u])
298 (aset standard-display-table ?,Lo(B [?i?a]) 298 (aset standard-display-table ?,Lo(B [?i ?a])
299 ;; Unicode version: 299 ;; Unicode version:
300 (aset standard-display-table ?$,1(X(B [?y]) 300 (aset standard-display-table ?$,1(X(B [?y])
301 (aset standard-display-table ?$,1(8(B [?Y]) 301 (aset standard-display-table ?$,1(8(B [?Y])
302 (aset standard-display-table ?$,1(Y(B [?i]) 302 (aset standard-display-table ?$,1(Y(B [?i])
303 (aset standard-display-table ?$,1(9(B [?Y]) 303 (aset standard-display-table ?$,1(9(B [?Y])
304 (aset standard-display-table ?$,1(n(B [?i?u]) 304 (aset standard-display-table ?$,1(n(B [?i ?u])
305 (aset standard-display-table ?$,1(o(B [?i?a])))) 305 (aset standard-display-table ?$,1(o(B [?i ?a]))))
306 306
307;; 307;;
308(provide 'cyril-util) 308(provide 'cyril-util)