Mercurial > emacs
annotate leim/quail/czech.el @ 74600:ab428131b528
(syntax-ppss-toplevel-pos): New fun.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 12 Dec 2006 02:36:38 +0000 |
parents | b77dca5fd30d |
children | f5f322eb227f 72dea2ff0142 |
rev | line source |
---|---|
48309 | 1 ;;; czech.el --- Quail package for inputting Czech -*-coding: iso-2022-7bit;-*- |
21196 | 2 |
70123
b77dca5fd30d
update copyright year(s)
Ramprasad B <ramprasad_i82@yahoo.com>
parents:
67657
diff
changeset
|
3 ;; Copyright (C) 1998, 2001, 2006 Free Software Foundation, Inc. |
21196 | 4 |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
5 ;; Author: Milan Zamazal <pdm@zamazal.org> |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37767
diff
changeset
|
6 ;; Maintainer: Pavel Jan,Bm(Bk <Pavel@Janik.cz> |
44409
34da8d9e5ea2
Add i18 keyword to get listed in package finder.
Pavel Janík <Pavel@Janik.cz>
parents:
38453
diff
changeset
|
7 ;; Keywords: i18n, multilingual, input method, Czech |
21196 | 8 |
21422 | 9 ;; This file is part of GNU Emacs. |
10 | |
11 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
12 ;; it under the terms of the GNU General Public License as published by | |
13 ;; the Free Software Foundation; either version 2, or (at your option) | |
14 ;; any later version. | |
15 | |
16 ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 ;; GNU General Public License for more details. | |
20 | |
21 ;; You should have received a copy of the GNU General Public License | |
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
64083 | 23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
24 ;; Boston, MA 02110-1301, USA. | |
21196 | 25 |
26 ;;; Commentary: | |
27 | |
28 ;; This file defines the following Czech keyboards: | |
29 ;; - "standard" Czech keyboard in the Windoze NT 105 keys version (both | |
30 ;; "QWERTZ" and "QWERTY" versions) | |
31 ;; - three non-standard Czech keyboards for programmers | |
32 | |
33 ;;; Code: | |
34 | |
35 (require 'quail) | |
36 | |
37 | |
38 (quail-define-package | |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
39 "czech" "Czech" "CZ" t |
21196 | 40 "\"Standard\" Czech keyboard in the Windoze NT 105 keys version." |
23045
a1cc2b12fdef
("czech"): Make this input method deterministic,
Kenichi Handa <handa@m17n.org>
parents:
23005
diff
changeset
|
41 nil t t t t nil nil nil nil nil t) |
21196 | 42 |
43 (quail-define-rules | |
44 ("1" ?+) | |
45 ("2" ?,Bl(B) | |
46 ("3" ?,B9(B) | |
47 ("4" ?,Bh(B) | |
48 ("5" ?,Bx(B) | |
49 ("6" ?,B>(B) | |
50 ("7" ?,B}(B) | |
51 ("8" ?,Ba(B) | |
52 ("9" ?,Bm(B) | |
53 ("0" ?,Bi(B) | |
54 ("!" ?1) | |
55 ("@" ?2) | |
56 ("#" ?3) | |
57 ("$" ?4) | |
58 ("%" ?5) | |
59 ("^" ?6) | |
60 ("&" ?7) | |
61 ("*" ?8) | |
62 ("(" ?9) | |
63 (")" ?0) | |
64 ("-" ?=) | |
65 ("_" ?%) | |
66 ("[" ?,Bz(B) | |
67 ("{" ?/) | |
68 ("]" ?\)) | |
69 ("}" ?\() | |
70 ("|" ?`) | |
71 (";" ?,By(B) | |
72 (":" ?\") | |
73 ("'" ?,B'(B) | |
74 ("\"" ?!) | |
75 ("<" ??) | |
76 (">" ?:) | |
77 ("/" ?-) | |
78 ("?" ?_) | |
79 ("`" ?\;) | |
80 ("y" ?z) | |
81 ("z" ?y) | |
82 ("Y" ?Z) | |
83 ("Z" ?Y) | |
84 ("\\a" ?,Bd(B) | |
85 ("\\o" ?,Bv(B) | |
86 ("\\s" ?,B_(B) | |
87 ("\\u" ?,B|(B) | |
88 ("\\A" ?,BD(B) | |
89 ("\\O" ?,BV(B) | |
90 ("\\S" ?,B_(B) | |
91 ("\\U" ?,B\(B) | |
92 ("~u" ?,By(B) | |
93 ("~U" ?,BY(B) | |
94 ("=a" ?,Ba(B) | |
95 ("+c" ?,Bh(B) | |
96 ("+d" ?,Bo(B) | |
97 ("=e" ?,Bi(B) | |
98 ("+e" ?,Bl(B) | |
99 ("=i" ?,Bm(B) | |
100 ("+n" ?,Br(B) | |
101 ("=o" ?,Bs(B) | |
102 ("+r" ?,Bx(B) | |
103 ("+s" ?,B9(B) | |
104 ("+t" ?,B;(B) | |
105 ("=u" ?,Bz(B) | |
106 ("=z" ?,B}(B) | |
107 ("+y" ?,B>(B) | |
108 ("=A" ?,BA(B) | |
109 ("+C" ?,BH(B) | |
110 ("+D" ?,BO(B) | |
111 ("=E" ?,BI(B) | |
112 ("+E" ?,BL(B) | |
113 ("=I" ?,BM(B) | |
114 ("+N" ?,BR(B) | |
115 ("=O" ?,BS(B) | |
116 ("+R" ?,BX(B) | |
117 ("+S" ?,B)(B) | |
118 ("+T" ?,B+(B) | |
119 ("=U" ?,BZ(B) | |
120 ("=Z" ?,B](B) | |
121 ("+Y" ?,B.(B) | |
122 ("=1" ?!) | |
123 ("=2" ?@) | |
124 ("=3" ?#) | |
125 ("=4" ?$) | |
126 ("=5" ?%) | |
127 ("=6" ?^) | |
128 ("=7" ?&) | |
129 ("=8" ?*) | |
130 ("=9" ?\() | |
131 ("=0" ?\)) | |
132 ("+1" ?!) | |
133 ("+2" ?@) | |
134 ("+3" ?#) | |
135 ("+4" ?$) | |
136 ("+5" ?%) | |
137 ("+6" ?^) | |
138 ("+7" ?&) | |
139 ("+8" ?*) | |
140 ("+9" ?\() | |
141 ("+0" ?\)) | |
23005
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
142 ("=<" ?<) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
143 ("=>" ?>) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
144 ("=[" ?\[) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
145 ("=]" ?\]) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
146 ("={" ?{) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
147 ("=}" ?}) |
21196 | 148 ([kp-1] ?1) |
149 ([kp-2] ?2) | |
150 ([kp-3] ?3) | |
151 ([kp-4] ?4) | |
152 ([kp-5] ?5) | |
153 ([kp-6] ?6) | |
154 ([kp-7] ?7) | |
155 ([kp-8] ?8) | |
156 ([kp-9] ?9) | |
157 ([kp-0] ?0) | |
158 ([kp-add] ?+)) | |
159 | |
160 (quail-define-package | |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
161 "czech-qwerty" "Czech" "CZ" t |
21196 | 162 "\"Standard\" Czech keyboard in the Windoze NT 105 keys version, QWERTY layout." |
31426
62b4382a5ad6
("czech-qwerty"): Changed to show keyboard layout
Kenichi Handa <handa@m17n.org>
parents:
23045
diff
changeset
|
163 nil t nil nil t nil nil nil nil nil t) |
21196 | 164 |
165 (quail-define-rules | |
166 ("1" ?+) | |
167 ("2" ?,Bl(B) | |
168 ("3" ?,B9(B) | |
169 ("4" ?,Bh(B) | |
170 ("5" ?,Bx(B) | |
171 ("6" ?,B>(B) | |
172 ("7" ?,B}(B) | |
173 ("8" ?,Ba(B) | |
174 ("9" ?,Bm(B) | |
175 ("0" ?,Bi(B) | |
176 ("!" ?1) | |
177 ("@" ?2) | |
178 ("#" ?3) | |
179 ("$" ?4) | |
180 ("%" ?5) | |
181 ("^" ?6) | |
182 ("&" ?7) | |
183 ("*" ?8) | |
184 ("(" ?9) | |
185 (")" ?0) | |
186 ("-" ?=) | |
187 ("_" ?%) | |
188 ("[" ?,Bz(B) | |
189 ("{" ?/) | |
190 ("]" ?\)) | |
191 ("}" ?\() | |
192 ("|" ?`) | |
193 (";" ?,By(B) | |
194 (":" ?\") | |
195 ("'" ?,B'(B) | |
196 ("\"" ?!) | |
197 ("<" ??) | |
198 (">" ?:) | |
199 ("/" ?-) | |
200 ("?" ?_) | |
201 ("`" ?\;) | |
202 ("\\a" ?,Bd(B) | |
203 ("\\o" ?,Bv(B) | |
204 ("\\s" ?,B_(B) | |
205 ("\\u" ?,B|(B) | |
206 ("\\A" ?,BD(B) | |
207 ("\\O" ?,BV(B) | |
208 ("\\S" ?,B_(B) | |
209 ("\\U" ?,B\(B) | |
210 ("~u" ?,By(B) | |
211 ("~U" ?,BY(B) | |
212 ("=a" ?,Ba(B) | |
213 ("+c" ?,Bh(B) | |
214 ("+d" ?,Bo(B) | |
215 ("=e" ?,Bi(B) | |
216 ("+e" ?,Bl(B) | |
217 ("=i" ?,Bm(B) | |
218 ("+n" ?,Br(B) | |
219 ("=o" ?,Bs(B) | |
220 ("+r" ?,Bx(B) | |
221 ("+s" ?,B9(B) | |
222 ("+t" ?,B;(B) | |
223 ("=u" ?,Bz(B) | |
224 ("=y" ?,B}(B) | |
225 ("+z" ?,B>(B) | |
226 ("=A" ?,BA(B) | |
227 ("+C" ?,BH(B) | |
228 ("+D" ?,BO(B) | |
229 ("=E" ?,BI(B) | |
230 ("+E" ?,BL(B) | |
231 ("=I" ?,BM(B) | |
232 ("+N" ?,BR(B) | |
233 ("=O" ?,BS(B) | |
234 ("+R" ?,BX(B) | |
235 ("+S" ?,B)(B) | |
236 ("+T" ?,B+(B) | |
237 ("=Y" ?,B](B) | |
238 ("+Z" ?,B.(B) | |
239 ("=U" ?,BZ(B) | |
240 ("=1" ?!) | |
241 ("=2" ?@) | |
242 ("=3" ?#) | |
243 ("=4" ?$) | |
244 ("=5" ?%) | |
245 ("=6" ?^) | |
246 ("=7" ?&) | |
247 ("=8" ?*) | |
248 ("=9" ?\() | |
249 ("=0" ?\)) | |
250 ("+1" ?!) | |
251 ("+2" ?@) | |
252 ("+3" ?#) | |
253 ("+4" ?$) | |
254 ("+5" ?%) | |
255 ("+6" ?^) | |
256 ("+7" ?&) | |
257 ("+8" ?*) | |
258 ("+9" ?\() | |
259 ("+0" ?\)) | |
23005
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
260 ("=<" ?<) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
261 ("=>" ?>) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
262 ("=[" ?\[) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
263 ("=]" ?\]) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
264 ("={" ?{) |
3d67e77643dd
Few key sequences added to some keyboards.
Richard M. Stallman <rms@gnu.org>
parents:
21422
diff
changeset
|
265 ("=}" ?}) |
21196 | 266 ([kp-1] ?1) |
267 ([kp-2] ?2) | |
268 ([kp-3] ?3) | |
269 ([kp-4] ?4) | |
270 ([kp-5] ?5) | |
271 ([kp-6] ?6) | |
272 ([kp-7] ?7) | |
273 ([kp-8] ?8) | |
274 ([kp-9] ?9) | |
275 ([kp-0] ?0) | |
276 ([kp-add] ?+)) | |
277 | |
278 (quail-define-package | |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
279 "czech-prog-1" "Czech" "CZ" t |
21196 | 280 "Czech (non-standard) keyboard for programmers #1. |
281 | |
282 All digits except of `1' are replaced by Czech characters as on the standard | |
283 Czech keyboard. | |
284 `1' is replaced by `+'. | |
285 `+' is a dead key. Multiple presses of the dead key generate various accents. | |
286 All other keys are the same as on standard US keyboard." | |
31426
62b4382a5ad6
("czech-qwerty"): Changed to show keyboard layout
Kenichi Handa <handa@m17n.org>
parents:
23045
diff
changeset
|
287 nil t nil nil t nil nil nil nil nil t) |
21196 | 288 |
289 (quail-define-rules | |
290 ("1" ?+) | |
291 ("2" ?,Bl(B) | |
292 ("3" ?,B9(B) | |
293 ("4" ?,Bh(B) | |
294 ("5" ?,Bx(B) | |
295 ("6" ?,B>(B) | |
296 ("7" ?,B}(B) | |
297 ("8" ?,Ba(B) | |
298 ("9" ?,Bm(B) | |
299 ("0" ?,Bi(B) | |
300 ("+1" ?1) | |
301 ("+2" ?2) | |
302 ("+3" ?3) | |
303 ("+4" ?4) | |
304 ("+5" ?5) | |
305 ("+6" ?6) | |
306 ("+7" ?7) | |
307 ("+8" ?8) | |
308 ("+9" ?9) | |
309 ("+0" ?0) | |
310 ("+a" ?,Ba(B) | |
311 ("++a" ?,Bd(B) | |
312 ("+c" ?,Bh(B) | |
313 ("+d" ?,Bo(B) | |
314 ("+e" ?,Bi(B) | |
315 ("++e" ?,Bl(B) | |
316 ("+i" ?,Bm(B) | |
317 ("+l" ?,Be(B) | |
318 ("++l" ?,B5(B) | |
319 ("+n" ?,Br(B) | |
320 ("+o" ?,Bs(B) | |
321 ("++o" ?,Bv(B) | |
322 ("+++o" ?,Bt(B) | |
323 ("+r" ?,Bx(B) | |
324 ("++r" ?,B`(B) | |
325 ("+s" ?,B9(B) | |
326 ("++s" ?,B_(B) | |
327 ("+t" ?,B;(B) | |
328 ("+u" ?,Bz(B) | |
329 ("++u" ?,By(B) | |
330 ("+++u" ?,B|(B) | |
331 ("+y" ?,B}(B) | |
332 ("+z" ?,B>(B) | |
333 ("+A" ?,BA(B) | |
334 ("++A" ?,BD(B) | |
335 ("+C" ?,BH(B) | |
336 ("+D" ?,BO(B) | |
337 ("+E" ?,BI(B) | |
338 ("++E" ?,BL(B) | |
339 ("+I" ?,BM(B) | |
340 ("+L" ?,BE(B) | |
341 ("++L" ?,B%(B) | |
342 ("+N" ?,BR(B) | |
343 ("+O" ?,BS(B) | |
344 ("++O" ?,BV(B) | |
345 ("+++O" ?,BT(B) | |
346 ("+R" ?,BX(B) | |
347 ("++R" ?,B@(B) | |
348 ("+S" ?,B)(B) | |
349 ("++S" ?,B_(B) | |
350 ("+T" ?,B+(B) | |
351 ("+U" ?,BZ(B) | |
352 ("++U" ?,BY(B) | |
353 ("+++U" ?,B\(B) | |
354 ("+Y" ?,B](B) | |
355 ("+Z" ?,B.(B) | |
356 ([kp-1] ?1) | |
357 ([kp-2] ?2) | |
358 ([kp-3] ?3) | |
359 ([kp-4] ?4) | |
360 ([kp-5] ?5) | |
361 ([kp-6] ?6) | |
362 ([kp-7] ?7) | |
363 ([kp-8] ?8) | |
364 ([kp-9] ?9) | |
365 ([kp-0] ?0) | |
366 ([kp-add] ?+)) | |
367 | |
368 (quail-define-package | |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
369 "czech-prog-2" "Czech" "CZ" t |
21196 | 370 "Czech (non-standard) keyboard for programmers #2. |
371 | |
372 All digits except of `1' are replaced by Czech characters as on the standard | |
373 Czech keyboard. | |
374 `1' is replaced by `,By(B'. | |
375 `+' is a dead key. Multiple presses of the dead key generate various accents. | |
376 All other keys are the same as on standard US keyboard." | |
31426
62b4382a5ad6
("czech-qwerty"): Changed to show keyboard layout
Kenichi Handa <handa@m17n.org>
parents:
23045
diff
changeset
|
377 nil t nil nil t nil nil nil nil nil t) |
21196 | 378 |
379 (quail-define-rules | |
380 ("1" ?,By(B) | |
381 ("2" ?,Bl(B) | |
382 ("3" ?,B9(B) | |
383 ("4" ?,Bh(B) | |
384 ("5" ?,Bx(B) | |
385 ("6" ?,B>(B) | |
386 ("7" ?,B}(B) | |
387 ("8" ?,Ba(B) | |
388 ("9" ?,Bm(B) | |
389 ("0" ?,Bi(B) | |
390 ("+1" ?1) | |
391 ("+2" ?2) | |
392 ("+3" ?3) | |
393 ("+4" ?4) | |
394 ("+5" ?5) | |
395 ("+6" ?6) | |
396 ("+7" ?7) | |
397 ("+8" ?8) | |
398 ("+9" ?9) | |
399 ("+0" ?0) | |
400 ("+a" ?,Ba(B) | |
401 ("++a" ?,Bd(B) | |
402 ("+c" ?,Bh(B) | |
403 ("+d" ?,Bo(B) | |
404 ("+e" ?,Bi(B) | |
405 ("++e" ?,Bl(B) | |
406 ("+i" ?,Bm(B) | |
407 ("+l" ?,Be(B) | |
408 ("++l" ?,B5(B) | |
409 ("+n" ?,Br(B) | |
410 ("+o" ?,Bs(B) | |
411 ("++o" ?,Bv(B) | |
412 ("+++o" ?,Bt(B) | |
413 ("+r" ?,Bx(B) | |
414 ("++r" ?,B`(B) | |
415 ("+s" ?,B9(B) | |
416 ("++s" ?,B_(B) | |
417 ("+t" ?,B;(B) | |
418 ("+u" ?,Bz(B) | |
419 ("++u" ?,By(B) | |
420 ("+++u" ?,B|(B) | |
421 ("+y" ?,B}(B) | |
422 ("+z" ?,B>(B) | |
423 ("+A" ?,BA(B) | |
424 ("++A" ?,BD(B) | |
425 ("+C" ?,BH(B) | |
426 ("+D" ?,BO(B) | |
427 ("+E" ?,BI(B) | |
428 ("++E" ?,BL(B) | |
429 ("+I" ?,BM(B) | |
430 ("+L" ?,BE(B) | |
431 ("++L" ?,B%(B) | |
432 ("+N" ?,BR(B) | |
433 ("+O" ?,BS(B) | |
434 ("++O" ?,BV(B) | |
435 ("+++O" ?,BT(B) | |
436 ("+R" ?,BX(B) | |
437 ("++R" ?,B@(B) | |
438 ("+S" ?,B)(B) | |
439 ("++S" ?,B_(B) | |
440 ("+T" ?,B+(B) | |
441 ("+U" ?,BZ(B) | |
442 ("++U" ?,BY(B) | |
443 ("+++U" ?,B\(B) | |
444 ("+Y" ?,B](B) | |
445 ("+Z" ?,B.(B) | |
446 ([kp-1] ?1) | |
447 ([kp-2] ?2) | |
448 ([kp-3] ?3) | |
449 ([kp-4] ?4) | |
450 ([kp-5] ?5) | |
451 ([kp-6] ?6) | |
452 ([kp-7] ?7) | |
453 ([kp-8] ?8) | |
454 ([kp-9] ?9) | |
455 ([kp-0] ?0) | |
456 ([kp-add] ?+)) | |
457 | |
458 (quail-define-package | |
37767
9cea2faa6fb8
Set guidance to t for czech and
Gerd Moellmann <gerd@gnu.org>
parents:
31426
diff
changeset
|
459 "czech-prog-3" "Czech" "CZ" t |
21196 | 460 "Czech (non-standard) keyboard for programmers compatible with the default |
461 keyboard from the obsolete `emacs-czech' package. | |
462 | |
463 All digits except of `1' are replaced by Czech characters as on the standard | |
464 Czech keyboard. | |
465 `[' and `]' are replaced with `,Bz(B' and `,By(B', respectively. | |
466 There are two dead keys on `=' and `+'. Characters with diaresis are | |
467 accessible through `+='. | |
468 All other keys are the same as on standard US keyboard." | |
31426
62b4382a5ad6
("czech-qwerty"): Changed to show keyboard layout
Kenichi Handa <handa@m17n.org>
parents:
23045
diff
changeset
|
469 nil t nil nil t nil nil nil nil nil t) |
21196 | 470 |
471 (quail-define-rules | |
472 ("2" ?,Bl(B) | |
473 ("3" ?,B9(B) | |
474 ("4" ?,Bh(B) | |
475 ("5" ?,Bx(B) | |
476 ("6" ?,B>(B) | |
477 ("7" ?,B}(B) | |
478 ("8" ?,Ba(B) | |
479 ("9" ?,Bm(B) | |
480 ("0" ?,Bi(B) | |
481 ("[" ?,Bz(B) | |
482 ("]" ?,By(B) | |
483 ("==" ?=) | |
484 ("++" ?+) | |
485 ("=+" ?+) | |
486 ("=[" ?\[) | |
487 ("=]" ?\]) | |
488 ("+[" ?\[) | |
489 ("+]" ?\]) | |
490 ("=1" ?1) | |
491 ("=2" ?2) | |
492 ("=3" ?3) | |
493 ("=4" ?4) | |
494 ("=5" ?5) | |
495 ("=6" ?6) | |
496 ("=7" ?7) | |
497 ("=8" ?8) | |
498 ("=9" ?9) | |
499 ("=0" ?0) | |
500 ("+1" ?1) | |
501 ("+2" ?2) | |
502 ("+3" ?3) | |
503 ("+4" ?4) | |
504 ("+5" ?5) | |
505 ("+6" ?6) | |
506 ("+7" ?7) | |
507 ("+8" ?8) | |
508 ("+9" ?9) | |
509 ("+0" ?0) | |
510 ("=A" ?,BA(B) | |
511 ("+A" ?,BD(B) | |
512 ("+=A" ?,BD(B) | |
513 ("+C" ?,BH(B) | |
514 ("+D" ?,BO(B) | |
515 ("=E" ?,BI(B) | |
516 ("+E" ?,BL(B) | |
517 ("=I" ?,BM(B) | |
518 ("=L" ?,B%(B) | |
519 ("+L" ?,BE(B) | |
520 ("+N" ?,BR(B) | |
521 ("=O" ?,BS(B) | |
522 ("+O" ?,BT(B) | |
523 ("+=O" ?,BV(B) | |
524 ("=R" ?,B@(B) | |
525 ("+R" ?,BX(B) | |
526 ("+S" ?,B)(B) | |
527 ("=S" ?,B_(B) | |
528 ("+T" ?,B+(B) | |
529 ("=U" ?,BZ(B) | |
530 ("+U" ?,BY(B) | |
531 ("+=U" ?,B\(B) | |
532 ("=Y" ?,B](B) | |
533 ("+Z" ?,B.(B) | |
534 ("=a" ?,Ba(B) | |
535 ("+a" ?,Bd(B) | |
536 ("+=a" ?,Bd(B) | |
537 ("+c" ?,Bh(B) | |
538 ("+d" ?,Bo(B) | |
539 ("=e" ?,Bi(B) | |
540 ("+e" ?,Bl(B) | |
541 ("=i" ?,Bm(B) | |
542 ("=l" ?,B5(B) | |
543 ("+l" ?,Be(B) | |
544 ("+n" ?,Br(B) | |
545 ("=o" ?,Bs(B) | |
546 ("+o" ?,Bt(B) | |
547 ("+=o" ?,Bv(B) | |
548 ("=r" ?,B`(B) | |
549 ("+r" ?,Bx(B) | |
550 ("+s" ?,B9(B) | |
551 ("=s" ?,B_(B) | |
552 ("+t" ?,B;(B) | |
553 ("=u" ?,Bz(B) | |
554 ("+u" ?,By(B) | |
555 ("+=u" ?,B|(B) | |
556 ("=y" ?,B}(B) | |
557 ("+z" ?,B>(B) | |
558 ([kp-1] ?1) | |
559 ([kp-2] ?2) | |
560 ([kp-3] ?3) | |
561 ([kp-4] ?4) | |
562 ([kp-5] ?5) | |
563 ([kp-6] ?6) | |
564 ([kp-7] ?7) | |
565 ([kp-8] ?8) | |
566 ([kp-9] ?9) | |
567 ([kp-0] ?0) | |
568 ([kp-add] ?+)) | |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37767
diff
changeset
|
569 |
52401 | 570 ;;; arch-tag: 0a27dffc-a5e1-479f-9da2-a9eb91b34d8a |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37767
diff
changeset
|
571 ;;; czech.el ends here |