Mercurial > emacs
annotate leim/quail/cyrillic.el @ 109686:111f90199914
Fixed bug#6766 (icalendar.el)
lisp/ChangeLog:
* calendar/icalendar.el (icalendar-uid-format): Doc fix.
(icalendar--split-value): Fixed splitting regexp. (Bug#6766)
(icalendar--get-weekday-numbers): New
(icalendar--create-uid, icalendar-export-region)
(icalendar--parse-summary-and-rest): Code formatting.
(icalendar--convert-recurring-to-diary): Handle multiple byday
values in weekly rules. (Bug#6766)
test/ChangeLog:
* icalendar-testsuite.el (icalendar-testsuite-run): Added internal tests.
(icalendar-testsuite--trim, icalendar-testsuite--compare-strings)
(icalendar-testsuite--run-internal-tests): New.
(icalendar-testsuite--test-convert-ordinary-to-ical)
(icalendar-testsuite--test-convert-block-to-ical)
(icalendar-testsuite--test-convert-anniversary-to-ical)
(icalendar-testsuite--test-parse-vtimezone)
(icalendar-testsuite--do-test-export): Code formatting.
(icalendar-testsuite--test-parse-vtimezone): Doc fix.
(icalendar-testsuite--do-test-import)
(icalendar-testsuite--do-test-cycle): Use icalendar-testsuite--compare-strings
(icalendar-testsuite--run-import-tests): Comment added.
(icalendar-testsuite--run-import-tests)
(icalendar-testsuite--run-real-world-tests): Fixed expected results.
author | Ulf Jasper <ulf.jasper@web.de> |
---|---|
date | Sun, 08 Aug 2010 19:42:47 +0200 |
parents | 1d1d5d9bd884 |
children | 376148b31b5e |
rev | line source |
---|---|
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
24947
diff
changeset
|
1 ;;; cyrillic.el --- Quail package for inputting Cyrillic characters |
18673 | 2 |
106815 | 3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 |
67657 | 4 ;; Free Software Foundation, Inc. |
75253
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
5 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, |
106815 | 6 ;; 2006, 2007, 2008, 2009, 2010 |
67657 | 7 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
8 ;; Registration Number H14PRO021 | |
18673 | 9 |
46499 | 10 ;; Author: TAKAHASHI Naoto <ntakahas@m17n.org> |
11 ;; Keywords: multilingual, input method, Cyrillic, i18n | |
18673 | 12 |
13 ;; This file is part of GNU Emacs. | |
14 | |
94710
4f1fd208c354
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
91327
diff
changeset
|
15 ;; GNU Emacs is free software: you can redistribute it and/or modify |
18673 | 16 ;; it under the terms of the GNU General Public License as published by |
94710
4f1fd208c354
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
91327
diff
changeset
|
17 ;; the Free Software Foundation, either version 3 of the License, or |
4f1fd208c354
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
91327
diff
changeset
|
18 ;; (at your option) any later version. |
18673 | 19 |
20 ;; GNU Emacs is distributed in the hope that it will be useful, | |
21 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
22 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
23 ;; GNU General Public License for more details. | |
24 | |
25 ;; You should have received a copy of the GNU General Public License | |
94710
4f1fd208c354
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
91327
diff
changeset
|
26 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. |
18673 | 27 |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
24947
diff
changeset
|
28 ;;; Commentary: |
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
24947
diff
changeset
|
29 |
46499 | 30 ;; These methods use a mixture of 8859-5 and Unicode. Quail, used |
31 ;; with ucs-tables provides suport for translating on the fly to | |
32 ;; what's appropriate for aa buffer's file coding system, so the | |
33 ;; encoding shouldn't matter too much provided it supports the | |
34 ;; necessary characters. | |
35 | |
18673 | 36 ;;; Code: |
37 | |
38 (require 'quail) | |
39 | |
46499 | 40 ;; This was `cyrillic-jcuken'. Alexander Mikhailian |
41 ;; <mikhailian@altern.org> says: "cyrillic-jcuken" is actually | |
42 ;; russian. It is ok but a bit outdated. This layout has been used | |
43 ;; in typewriters for ages but it has been superceeded on desktops by | |
44 ;; a variation of this layout, implemented in M$ Windows software. | |
45 ;; The Windows layout is greatly preferred because of the comma and | |
46 ;; period being placed more conviniently and, of course, because of | |
47 ;; the popularity of Windows software. This layout is a common option | |
48 ;; in X Windows and console layouts for GNU/Linux. [See | |
49 ;; `russian-computer' below.] | |
18673 | 50 (quail-define-package |
46499 | 51 "russian-typewriter" "Russian" ",L69(B" nil |
52 ",L9FC:5=(B Russian typewriter layout (ISO 8859-5 encoding)." | |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
53 nil t t t t nil nil nil nil nil t) |
18673 | 54 |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
55 ;; ,Lp(B1 -2 /3 "4 :5 ,6 .7 _8 ?9 %0 != ;\ |+ |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
56 ;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,LJ(B )( |
54481 | 57 ;; ,LD(B ,LK(B ,L2(B ,L0(B ,L?(B ,L@(B ,L>(B ,L;(B ,L4(B ,L6(B ,LM(B |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
58 ;; ,LO(B ,LG(B ,LA(B ,L<(B ,L8(B ,LB(B ,LL(B ,L1(B ,LN(B ,L!(B |
18673 | 59 |
60 (quail-define-rules | |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
61 ("1" ?,Lp(B) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
62 ("2" ?-) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
63 ("3" ?/) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
64 ("4" ?\") |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
65 ("5" ?:) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
66 ("6" ?,) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
67 ("7" ?.) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
68 ("8" ?_) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
69 ("9" ??) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
70 ("0" ?%) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
71 ("-" ?!) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
72 ("=" ?\;) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
73 ("`" ?|) |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
74 ("q" ?,LY(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
75 ("w" ?,Lf(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
76 ("e" ?,Lc(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
77 ("r" ?,LZ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
78 ("t" ?,LU(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
79 ("y" ?,L](B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
80 ("u" ?,LS(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
81 ("i" ?,Lh(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
82 ("o" ?,Li(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
83 ("p" ?,LW(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
84 ("[" ?,Le(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
85 ("]" ?,Lj(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
86 ("a" ?,Ld(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
87 ("s" ?,Lk(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
88 ("d" ?,LR(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
89 ("f" ?,LP(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
90 ("g" ?,L_(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
91 ("h" ?,L`(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
92 ("j" ?,L^(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
93 ("k" ?,L[(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
94 ("l" ?,LT(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
95 (";" ?,LV(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
96 ("'" ?,Lm(B) |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
97 ("\\" ?\)) |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
98 ("z" ?,Lo(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
99 ("x" ?,Lg(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
100 ("c" ?,La(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
101 ("v" ?,L\(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
102 ("b" ?,LX(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
103 ("n" ?,Lb(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
104 ("m" ?,Ll(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
105 ("," ?,LQ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
106 ("." ?,Ln(B) |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
107 ("/" ?,Lq(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
108 |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
109 ("!" ?1) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
110 ("@" ?2) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
111 ("#" ?3) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
112 ("$" ?4) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
113 ("%" ?5) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
114 ("^" ?6) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
115 ("&" ?7) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
116 ("*" ?8) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
117 ("(" ?9) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
118 (")" ?0) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
119 ("_" ?=) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
120 ("+" ?\\) |
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
121 ("~" ?+) |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
122 ("Q" ?,L9(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
123 ("W" ?,LF(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
124 ("E" ?,LC(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
125 ("R" ?,L:(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
126 ("T" ?,L5(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
127 ("Y" ?,L=(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
128 ("U" ?,L3(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
129 ("I" ?,LH(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
130 ("O" ?,LI(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
131 ("P" ?,L7(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
132 ("{" ?,LE(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
133 ("}" ?,LJ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
134 ("A" ?,LD(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
135 ("S" ?,LK(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
136 ("D" ?,L2(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
137 ("F" ?,L0(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
138 ("G" ?,L?(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
139 ("H" ?,L@(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
140 ("J" ?,L>(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
141 ("K" ?,L;(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
142 ("L" ?,L4(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
143 (":" ?,L6(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
144 ("\"" ?,LM(B) |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
145 ("|" ?\() |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
146 ("Z" ?,LO(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
147 ("X" ?,LG(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
148 ("C" ?,LA(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
149 ("V" ?,L<(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
150 ("B" ?,L8(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
151 ("N" ?,LB(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
152 ("M" ?,LL(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
153 ("<" ?,L1(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
154 (">" ?,LN(B) |
106414
b6ccd1657f1c
* quail/cyrillic.el (russian-typewriter): Change keyboard layout.
Chong Yidong <cyd@stupidchicken.com>
parents:
100963
diff
changeset
|
155 ("?" ?,L!(B) |
46499 | 156 ) |
157 | |
158 ;; Maintain the obsolete name for now. | |
159 (push (cons "cyrillic-jcuken" | |
49639
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
160 (cdr (assoc "russian-typewriter" quail-package-alist))) |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
161 quail-package-alist) |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
162 |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
163 ;; This needs to be seen by quail-update-leim-list-file, but cannot be |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
164 ;; commented out because quail-update-leim-list-file ignores |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
165 ;; commented-out lines. |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
166 (if nil |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
167 (quail-define-package |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
168 "cyrillic-jcuken" "Russian" ",L69(B" nil |
d95c594fa5b6
Update quail-package-alist (not
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
169 ",L9FC:5=(B Russian typewriter layout (ISO 8859-5 encoding).")) |
46499 | 170 |
171 ;; See comment above. This is the variant `winkeys' from `ru' in XKB. | |
172 (quail-define-package | |
173 "russian-computer" "Russian" "RU" nil | |
174 ",L9FC:5=(B Russian computer layout" | |
175 nil t t t t nil nil nil nil nil t) | |
176 | |
99452
abd5e9a38eb9
Handle backslash key (bug#839).
Chong Yidong <cyd@stupidchicken.com>
parents:
98144
diff
changeset
|
177 ;; 1! 2" 3,Lp(B 4; 5% 6: 7? 8* 9( 0) -_ =+ \/ ,Lq!(B |
54481 | 178 ;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,LJ(B |
179 ;; ,LD(B ,LK(B ,L2(B ,L0(B ,L?(B ,L@(B ,L>(B ,L;(B ,L4(B ,L6(B ,LM(B | |
46499 | 180 ;; ,LO(B ,LG(B ,LA(B ,L<(B ,L8(B ,LB(B ,LL(B ,L1(B ,LN(B ., |
18673 | 181 |
46499 | 182 (quail-define-rules |
183 ("1" ?1) | |
184 ("2" ?2) | |
185 ("3" ?3) | |
186 ("4" ?4) | |
187 ("5" ?5) | |
188 ("6" ?6) | |
189 ("7" ?7) | |
190 ("8" ?8) | |
191 ("9" ?9) | |
192 ("0" ?0) | |
193 ("-" ?-) | |
194 ("=" ?=) | |
99452
abd5e9a38eb9
Handle backslash key (bug#839).
Chong Yidong <cyd@stupidchicken.com>
parents:
98144
diff
changeset
|
195 ("|" ?/) |
46499 | 196 ("`" ?,Lq(B) |
197 ("q" ?,LY(B) | |
198 ("w" ?,Lf(B) | |
199 ("e" ?,Lc(B) | |
200 ("r" ?,LZ(B) | |
201 ("t" ?,LU(B) | |
202 ("y" ?,L](B) | |
203 ("u" ?,LS(B) | |
204 ("i" ?,Lh(B) | |
205 ("o" ?,Li(B) | |
206 ("p" ?,LW(B) | |
207 ("[" ?,Le(B) | |
208 ("]" ?,Lj(B) | |
209 ("a" ?,Ld(B) | |
210 ("s" ?,Lk(B) | |
211 ("d" ?,LR(B) | |
212 ("f" ?,LP(B) | |
213 ("g" ?,L_(B) | |
214 ("h" ?,L`(B) | |
215 ("j" ?,L^(B) | |
216 ("k" ?,L[(B) | |
217 ("l" ?,LT(B) | |
218 (";" ?,LV(B) | |
219 ("'" ?,Lm(B) | |
220 ("\\" ?\\) | |
221 ("z" ?,Lo(B) | |
222 ("x" ?,Lg(B) | |
223 ("c" ?,La(B) | |
224 ("v" ?,L\(B) | |
225 ("b" ?,LX(B) | |
226 ("n" ?,Lb(B) | |
227 ("m" ?,Ll(B) | |
228 ("," ?,LQ(B) | |
229 ("." ?,Ln(B) | |
230 ("/" ?.) | |
231 ("!" ?!) | |
232 ("@" ?\") | |
233 ("#" ?,Lp(B) | |
234 ("$" ?\;) | |
235 ("%" ?%) | |
236 ("^" ?:) | |
237 ("&" ??) | |
238 ("*" ?*) | |
239 ("(" ?() | |
240 (")" ?)) | |
241 ("_" ?_) | |
242 ("+" ?+) | |
243 ("~" ?,L!(B) | |
244 ("Q" ?,L9(B) | |
245 ("W" ?,LF(B) | |
246 ("E" ?,LC(B) | |
247 ("R" ?,L:(B) | |
248 ("T" ?,L5(B) | |
249 ("Y" ?,L=(B) | |
250 ("U" ?,L3(B) | |
251 ("I" ?,LH(B) | |
252 ("O" ?,LI(B) | |
253 ("P" ?,L7(B) | |
254 ("{" ?,LE(B) | |
255 ("}" ?,LJ(B) | |
256 ("A" ?,LD(B) | |
257 ("S" ?,LK(B) | |
258 ("D" ?,L2(B) | |
259 ("F" ?,L0(B) | |
260 ("G" ?,L?(B) | |
261 ("H" ?,L@(B) | |
262 ("J" ?,L>(B) | |
263 ("K" ?,L;(B) | |
264 ("L" ?,L4(B) | |
265 (":" ?,L6(B) | |
266 ("\"" ?,LM(B) | |
267 ("|" ?|) | |
268 ("Z" ?,LO(B) | |
269 ("X" ?,LG(B) | |
270 ("C" ?,LA(B) | |
271 ("V" ?,L<(B) | |
272 ("B" ?,L8(B) | |
273 ("N" ?,LB(B) | |
274 ("M" ?,LL(B) | |
275 ("<" ?,L1(B) | |
276 (">" ?,LN(B) | |
277 ("?" ?,)) | |
18673 | 278 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
279 ;; Mikhailian couldn't check the next two. |
46499 | 280 |
281 ;; This seems to have the same layout for letters as mk in XKB, but at | |
282 ;; least the top row is different. | |
18673 | 283 (quail-define-package |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
284 "cyrillic-macedonian" "Cyrillic" ",L6(BM" nil |
88730 | 285 ",L)*5@B7(B-,L#,(B keyboard layout based on JUS.I.K1.004" |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
286 nil t t t t nil nil nil nil nil t) |
18673 | 287 |
288 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
289 ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L#(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
290 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L,(B ,L6(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
291 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ |
18673 | 292 |
293 (quail-define-rules | |
294 ("1" ?1) | |
295 ("2" ?2) | |
296 ("3" ?3) | |
297 ("4" ?4) | |
298 ("5" ?5) | |
299 ("6" ?6) | |
300 ("7" ?7) | |
301 ("8" ?8) | |
302 ("9" ?9) | |
303 ("0" ?0) | |
304 ("-" ?/) | |
305 ("=" ?+) | |
306 ("`" ?<) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
307 ("q" ?,Ly(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
308 ("w" ?,Lz(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
309 ("e" ?,LU(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
310 ("r" ?,L`(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
311 ("t" ?,Lb(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
312 ("y" ?,LW(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
313 ("u" ?,Lc(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
314 ("i" ?,LX(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
315 ("o" ?,L^(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
316 ("p" ?,L_(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
317 ("[" ?,Lh(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
318 ("]" ?,Ls(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
319 ("a" ?,LP(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
320 ("s" ?,La(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
321 ("d" ?,LT(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
322 ("f" ?,Ld(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
323 ("g" ?,LS(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
324 ("h" ?,Le(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
325 ("j" ?,Lx(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
326 ("k" ?,LZ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
327 ("l" ?,L[(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
328 (";" ?,Lg(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
329 ("'" ?,L|(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
330 ("\\" ?,LV(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
331 ("z" ?,Lu(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
332 ("x" ?,L(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
333 ("c" ?,Lf(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
334 ("v" ?,LR(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
335 ("b" ?,LQ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
336 ("n" ?,L](B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
337 ("m" ?,L\(B) |
18673 | 338 ("," ?,) |
339 ("." ?.) | |
340 ("/" ?-) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
341 |
18673 | 342 ("!" ?!) |
343 ("@" ?\") | |
344 ("#" ?#) | |
345 ("$" ?$) | |
346 ("%" ?%) | |
347 ("^" ?&) | |
348 ("&" ?') | |
349 ("*" ?\() | |
350 ("(" ?\)) | |
351 (")" ?=) | |
352 ("_" ??) | |
353 ("+" ?*) | |
354 ("~" ?>) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
355 ("Q" ?,L)(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
356 ("W" ?,L*(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
357 ("E" ?,L5(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
358 ("R" ?,L@(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
359 ("T" ?,LB(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
360 ("Y" ?,L7(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
361 ("U" ?,LC(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
362 ("I" ?,L8(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
363 ("O" ?,L>(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
364 ("P" ?,L?(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
365 ("{" ?,LH(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
366 ("}" ?,L#(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
367 ("A" ?,L0(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
368 ("S" ?,LA(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
369 ("D" ?,L4(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
370 ("F" ?,LD(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
371 ("G" ?,L3(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
372 ("H" ?,LE(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
373 ("J" ?,L((B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
374 ("K" ?,L:(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
375 ("L" ?,L;(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
376 (":" ?,LG(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
377 ("\"" ?,L,(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
378 ("|" ?,L6(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
379 ("Z" ?,L%(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
380 ("X" ?,L/(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
381 ("C" ?,LF(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
382 ("V" ?,L2(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
383 ("B" ?,L1(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
384 ("N" ?,L=(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
385 ("M" ?,L<(B) |
18673 | 386 ("<" ?\;) |
387 (">" ?:) | |
388 ("?" ?_)) | |
389 | |
390 ;; | |
391 | |
392 (quail-define-package | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
393 "cyrillic-serbian" "Cyrillic" ",L6(BS" nil |
88730 | 394 ",L)*5@B7(B-,L"+(B keyboard layout based on JUS.I.K1.005" |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
395 nil t t t t nil nil nil nil nil t) |
18673 | 396 |
397 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
398 ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L"(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
399 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L+(B ,L6(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
400 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ |
18673 | 401 |
402 (quail-define-rules | |
403 ("1" ?1) | |
404 ("2" ?2) | |
405 ("3" ?3) | |
406 ("4" ?4) | |
407 ("5" ?5) | |
408 ("6" ?6) | |
409 ("7" ?7) | |
410 ("8" ?8) | |
411 ("9" ?9) | |
412 ("0" ?0) | |
413 ("-" ?/) | |
414 ("=" ?+) | |
415 ("`" ?<) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
416 ("q" ?,Ly(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
417 ("w" ?,Lz(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
418 ("e" ?,LU(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
419 ("r" ?,L`(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
420 ("t" ?,Lb(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
421 ("y" ?,LW(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
422 ("u" ?,Lc(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
423 ("i" ?,LX(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
424 ("o" ?,L^(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
425 ("p" ?,L_(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
426 ("[" ?,Lh(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
427 ("]" ?,Lr(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
428 ("a" ?,LP(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
429 ("s" ?,La(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
430 ("d" ?,LT(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
431 ("f" ?,Ld(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
432 ("g" ?,LS(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
433 ("h" ?,Le(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
434 ("j" ?,Lx(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
435 ("k" ?,LZ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
436 ("l" ?,L[(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
437 (";" ?,Lg(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
438 ("'" ?,L{(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
439 ("\\" ?,LV(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
440 ("z" ?,Lu(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
441 ("x" ?,L(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
442 ("c" ?,Lf(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
443 ("v" ?,LR(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
444 ("b" ?,LQ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
445 ("n" ?,L](B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
446 ("m" ?,L\(B) |
18673 | 447 ("," ?,) |
448 ("." ?.) | |
449 ("/" ?-) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
450 |
18673 | 451 ("!" ?!) |
452 ("@" ?\") | |
453 ("#" ?#) | |
454 ("$" ?$) | |
455 ("%" ?%) | |
456 ("^" ?&) | |
457 ("&" ?') | |
458 ("*" ?\() | |
459 ("(" ?\)) | |
460 (")" ?=) | |
461 ("_" ??) | |
462 ("+" ?*) | |
463 ("~" ?>) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
464 ("Q" ?,L)(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
465 ("W" ?,L*(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
466 ("E" ?,L5(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
467 ("R" ?,L@(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
468 ("T" ?,LB(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
469 ("Y" ?,L7(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
470 ("U" ?,LC(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
471 ("I" ?,L8(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
472 ("O" ?,L>(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
473 ("P" ?,L?(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
474 ("{" ?,LH(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
475 ("}" ?,L"(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
476 ("A" ?,L0(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
477 ("S" ?,LA(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
478 ("D" ?,L4(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
479 ("F" ?,LD(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
480 ("G" ?,L3(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
481 ("H" ?,LE(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
482 ("J" ?,L((B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
483 ("K" ?,L:(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
484 ("L" ?,L;(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
485 (":" ?,LG(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
486 ("\"" ?,L+(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
487 ("|" ?,L6(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
488 ("Z" ?,L%(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
489 ("X" ?,L/(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
490 ("C" ?,LF(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
491 ("V" ?,L2(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
492 ("B" ?,L1(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
493 ("N" ?,L=(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
494 ("M" ?,L<(B) |
18673 | 495 ("<" ?\;) |
496 (">" ?:) | |
497 ("?" ?_)) | |
498 | |
499 ;; | |
500 | |
46499 | 501 ;; Alexander Mikhailian comments: |
502 ;; Having worked for several years as a Belarusian linguist, I still | |
503 ;; can not find the origin of this layout which BTW does include | |
504 ;; several characters that are not present in Belarusian and does not | |
505 ;; include a few ones that do exist in Belarusian. Besides, the typo | |
506 ;; in the name of this layout speaks for itself since Belarusian has | |
507 ;; an outdated version of spelling which is "Byelorussian" and not | |
508 ;; "beylorussian". I suggest that you just remove this layout. | |
18673 | 509 |
46499 | 510 ;; [`derived from JUS.I.K1' according to an old Mule note -- fx] |
511 | |
512 ;; (quail-define-package | |
513 ;; "cyrillic-beylorussian" "Belarussian" ",L6(BB" nil | |
514 ;; ",L)*5@B7(B-,L&.(B BEYLORUSSIAN (ISO 8859-5 encoding)" | |
515 ;; nil t t t t nil nil nil nil nil t) | |
516 | |
517 ;; ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
518 ;; ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B | |
519 ;; ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L.(B ,L6(B | |
520 ;; ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ | |
18673 | 521 |
46499 | 522 ;; (quail-define-rules |
523 ;; ("-" ?/) | |
524 ;; ("=" ?+) | |
525 ;; ("`" ?<) | |
526 ;; ("q" ?,Ly(B) | |
527 ;; ("w" ?,Lz(B) | |
528 ;; ("e" ?,LU(B) | |
529 ;; ("r" ?,L`(B) | |
530 ;; ("t" ?,Lb(B) | |
531 ;; ("y" ?,LW(B) | |
532 ;; ("u" ?,Lc(B) | |
533 ;; ("i" ?,LX(B) | |
534 ;; ("o" ?,L^(B) | |
535 ;; ("p" ?,L_(B) | |
536 ;; ("[" ?,Lh(B) | |
537 ;; ("]" ?,Lv(B) | |
538 ;; ("a" ?,LP(B) | |
539 ;; ("s" ?,La(B) | |
540 ;; ("d" ?,LT(B) | |
541 ;; ("f" ?,Ld(B) | |
542 ;; ("g" ?,LS(B) | |
543 ;; ("h" ?,Le(B) | |
544 ;; ("j" ?,Lx(B) | |
545 ;; ("k" ?,LZ(B) | |
546 ;; ("l" ?,L[(B) | |
547 ;; (";" ?,Lg(B) | |
548 ;; ("'" ?,L~(B) | |
549 ;; ("\\" ?,LV(B) | |
550 ;; ("z" ?,Lu(B) | |
551 ;; ("x" ?,L(B) | |
552 ;; ("c" ?,Lf(B) | |
553 ;; ("v" ?,LR(B) | |
554 ;; ("b" ?,LQ(B) | |
555 ;; ("n" ?,L](B) | |
556 ;; ("m" ?,L\(B) | |
557 ;; ("/" ?-) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
558 |
46499 | 559 ;; ("@" ?\") |
560 ;; ("^" ?&) | |
561 ;; ("&" ?') | |
562 ;; ("*" ?\() | |
563 ;; ("(" ?\)) | |
564 ;; (")" ?=) | |
565 ;; ("_" ??) | |
566 ;; ("+" ?*) | |
567 ;; ("~" ?>) | |
568 ;; ("Q" ?,L)(B) | |
569 ;; ("W" ?,L*(B) | |
570 ;; ("E" ?,L5(B) | |
571 ;; ("R" ?,L@(B) | |
572 ;; ("T" ?,LB(B) | |
573 ;; ("Y" ?,L7(B) | |
574 ;; ("U" ?,LC(B) | |
575 ;; ("I" ?,L8(B) | |
576 ;; ("O" ?,L>(B) | |
577 ;; ("P" ?,L?(B) | |
578 ;; ("{" ?,LH(B) | |
579 ;; ("}" ?,L&(B) | |
580 ;; ("A" ?,L0(B) | |
581 ;; ("S" ?,LA(B) | |
582 ;; ("D" ?,L4(B) | |
583 ;; ("F" ?,LD(B) | |
584 ;; ("G" ?,L3(B) | |
585 ;; ("H" ?,LE(B) | |
586 ;; ("J" ?,L((B) | |
587 ;; ("K" ?,L:(B) | |
588 ;; ("L" ?,L;(B) | |
589 ;; (":" ?,LG(B) | |
590 ;; ("\"" ?,L.(B) | |
591 ;; ("|" ?,L6(B) | |
592 ;; ("Z" ?,L%(B) | |
593 ;; ("X" ?,L/(B) | |
594 ;; ("C" ?,LF(B) | |
595 ;; ("V" ?,L2(B) | |
596 ;; ("B" ?,L1(B) | |
597 ;; ("N" ?,L=(B) | |
598 ;; ("M" ?,L<(B) | |
599 ;; ("<" ?\;) | |
600 ;; (">" ?:) | |
601 ;; ("?" ?_)) | |
18673 | 602 |
603 ;; | |
604 | |
46499 | 605 ;; Alexander Mikhailian reports the opinion of fellow Ukrainian |
606 ;; linguist Bogdan Babych <babych@altern.org>: | |
607 ;; He had seen this layout on some oldish systems but that the vast | |
608 ;; majority of the population uses a modified version of the M$ Windows | |
609 ;; layout. In fact, Microsoft shipped for a while a layout that was lacking | |
610 ;; two characters, precisely the "GHE_WITH_UPTURN" and the apostrophe. The | |
611 ;; latest versions of Windows software do have the "GHE_WITH_UPTURN" in the | |
612 ;; ukrainian keyborad layout but the apostrophe is still not there, whereas | |
613 ;; there is one letter, "Cyrillic_YO", not used in ukrainian. Ukrainians | |
614 ;; normally replace the "Cyrillic_YO" by the apostrophe sign and live | |
615 ;; happily with this little change. [See "ukrainian-computer" below.] | |
616 | |
617 ;; Fixme: add GHE_WITH_UPTURN. | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
618 (quail-define-package |
42037 | 619 "cyrillic-ukrainian" "Ukrainian" ",L6(BU" nil |
89483 | 620 ",L$'5@B7(B-,L&.(B UKRAINIAN |
18673 | 621 |
46499 | 622 Sorry, but 'ghe with upturn' is not included in ISO 8859-5." |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
623 nil t t t t nil nil nil nil nil t) |
18673 | 624 |
625 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
626 ;; ,L$(B ,L'(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
627 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L.(B ,L6(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
628 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ |
18673 | 629 |
630 (quail-define-rules | |
631 ("1" ?1) | |
632 ("2" ?2) | |
633 ("3" ?3) | |
634 ("4" ?4) | |
635 ("5" ?5) | |
636 ("6" ?6) | |
637 ("7" ?7) | |
638 ("8" ?8) | |
639 ("9" ?9) | |
640 ("0" ?0) | |
641 ("-" ?/) | |
642 ("=" ?+) | |
643 ("`" ?<) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
644 ("q" ?,Lt(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
645 ("w" ?,Lw(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
646 ("e" ?,LU(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
647 ("r" ?,L`(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
648 ("t" ?,Lb(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
649 ("y" ?,LW(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
650 ("u" ?,Lc(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
651 ("i" ?,LX(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
652 ("o" ?,L^(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
653 ("p" ?,L_(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
654 ("[" ?,Lh(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
655 ("]" ?,Lv(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
656 ("a" ?,LP(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
657 ("s" ?,La(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
658 ("d" ?,LT(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
659 ("f" ?,Ld(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
660 ("g" ?,LS(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
661 ("h" ?,Le(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
662 ("j" ?,Lx(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
663 ("k" ?,LZ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
664 ("l" ?,L[(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
665 (";" ?,Lg(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
666 ("'" ?,L~(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
667 ("\\" ?,LV(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
668 ("z" ?,Lu(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
669 ("x" ?,L(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
670 ("c" ?,Lf(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
671 ("v" ?,LR(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
672 ("b" ?,LQ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
673 ("n" ?,L](B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
674 ("m" ?,L\(B) |
18673 | 675 ("," ?,) |
676 ("." ?.) | |
677 ("/" ?-) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
678 |
18673 | 679 ("!" ?!) |
680 ("@" ?\") | |
681 ("#" ?#) | |
682 ("$" ?$) | |
683 ("%" ?%) | |
684 ("^" ?&) | |
685 ("&" ?') | |
686 ("*" ?\() | |
687 ("(" ?\)) | |
688 (")" ?=) | |
689 ("_" ??) | |
690 ("+" ?*) | |
691 ("~" ?>) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
692 ("Q" ?,L$(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
693 ("W" ?,L'(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
694 ("E" ?,L5(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
695 ("R" ?,L@(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
696 ("T" ?,LB(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
697 ("Y" ?,L7(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
698 ("U" ?,LC(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
699 ("I" ?,L8(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
700 ("O" ?,L>(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
701 ("P" ?,L?(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
702 ("{" ?,LH(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
703 ("}" ?,L&(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
704 ("A" ?,L0(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
705 ("S" ?,LA(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
706 ("D" ?,L4(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
707 ("F" ?,LD(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
708 ("G" ?,L3(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
709 ("H" ?,LE(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
710 ("J" ?,L((B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
711 ("K" ?,L:(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
712 ("L" ?,L;(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
713 (":" ?,LG(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
714 ("\"" ?,L.(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
715 ("|" ?,L6(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
716 ("Z" ?,L%(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
717 ("X" ?,L/(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
718 ("C" ?,LF(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
719 ("V" ?,L2(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
720 ("B" ?,L1(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
721 ("N" ?,L=(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
722 ("M" ?,L<(B) |
18673 | 723 ("<" ?\;) |
724 (">" ?:) | |
725 ("?" ?_)) | |
726 | |
46499 | 727 |
728 (quail-define-package | |
729 "ukrainian-computer" "Ukrainian" "UK" nil | |
730 "$,1(9(F(C(:(5(=(B Ukrainian (Unicode-based for use with KOI8-U encoding)." | |
731 nil t t t t nil nil nil nil nil t) | |
732 | |
733 ;; ' 1! 2" 3$,1uV(B 4; 5% 6: 7? 8* 9( 0) -_ =+ | |
734 ;; $,1(9(B $,1(F(B $,1(C(B $,1(:(B $,1(5(B $,1(=(B $,1(3(B $,1(H(B $,1(I(B $,1(7(B $,1(E(B $,1('(B | |
735 ;; $,1(D(B $,1(&(B $,1(2(B $,1(0(B $,1(?(B $,1(@(B $,1(>(B $,1(;(B $,1(4(B $,1(6(B $,1($(B $,1)P(B | |
736 ;; $,1(O(B $,1(G(B $,1(A(B $,1(<(B $,1(8(B $,1(B(B $,1(L(B $,1(1(B $,1(N(B ., | |
737 | |
738 (quail-define-rules | |
739 ("1" ?1) | |
740 ("2" ?2) | |
741 ("3" ?3) | |
742 ("4" ?4) | |
743 ("5" ?5) | |
744 ("6" ?6) | |
745 ("7" ?7) | |
746 ("8" ?8) | |
747 ("9" ?9) | |
748 ("0" ?0) | |
749 ("-" ?-) | |
750 ("=" ?=) | |
751 ("`" ?') | |
752 ("q" ?$,1(Y(B) | |
753 ("w" ?$,1(f(B) | |
754 ("e" ?$,1(c(B) | |
755 ("r" ?$,1(Z(B) | |
756 ("t" ?$,1(U(B) | |
757 ("y" ?$,1(](B) | |
758 ("u" ?$,1(S(B) | |
759 ("i" ?$,1(h(B) | |
760 ("o" ?$,1(i(B) | |
761 ("p" ?$,1(W(B) | |
762 ("[" ?$,1(e(B) | |
763 ("]" ?$,1(w(B) | |
764 ("a" ?$,1(d(B) | |
765 ("s" ?$,1(v(B) | |
766 ("d" ?$,1(R(B) | |
767 ("f" ?$,1(P(B) | |
768 ("g" ?$,1(_(B) | |
769 ("h" ?$,1(`(B) | |
770 ("j" ?$,1(^(B) | |
771 ("k" ?$,1([(B) | |
772 ("l" ?$,1(T(B) | |
773 (";" ?$,1(V(B) | |
774 ("'" ?$,1(t(B) | |
775 ("z" ?$,1(o(B) | |
776 ("x" ?$,1(g(B) | |
777 ("c" ?$,1(a(B) | |
778 ("v" ?$,1(\(B) | |
779 ("b" ?$,1(X(B) | |
780 ("n" ?$,1(b(B) | |
781 ("m" ?$,1(l(B) | |
782 ("," ?$,1(Q(B) | |
783 ("." ?$,1(n(B) | |
784 ("/" ?.) | |
785 ("!" ?!) | |
786 ("@" ?\") | |
787 ("#" ?$,1uV(B) | |
788 ("$" ?\;) | |
789 ("%" ?%) | |
790 ("^" ?:) | |
791 ("&" ??) | |
792 ("*" ?*) | |
793 ("(" ?() | |
794 (")" ?)) | |
795 ("_" ?_) | |
796 ("+" ?+) | |
797 ("~" ?') | |
798 ("Q" ?$,1(9(B) | |
799 ("W" ?$,1(F(B) | |
800 ("E" ?$,1(C(B) | |
801 ("R" ?$,1(:(B) | |
802 ("T" ?$,1(5(B) | |
803 ("Y" ?$,1(=(B) | |
804 ("U" ?$,1(3(B) | |
805 ("I" ?$,1(H(B) | |
806 ("O" ?$,1(I(B) | |
807 ("P" ?$,1(7(B) | |
808 ("{" ?$,1(E(B) | |
809 ("}" ?$,1('(B) | |
810 ("A" ?$,1(D(B) | |
811 ("S" ?$,1(&(B) | |
812 ("D" ?$,1(2(B) | |
813 ("F" ?$,1(0(B) | |
814 ("G" ?$,1(?(B) | |
815 ("H" ?$,1(@(B) | |
816 ("J" ?$,1(>(B) | |
817 ("K" ?$,1(;(B) | |
818 ("L" ?$,1(4(B) | |
819 (":" ?$,1(6(B) | |
820 ("\"" ?$,1($(B) | |
821 ("Z" ?$,1(O(B) | |
822 ("X" ?$,1(G(B) | |
823 ("C" ?$,1(A(B) | |
824 ("V" ?$,1(<(B) | |
825 ("B" ?$,1(8(B) | |
826 ("N" ?$,1(B(B) | |
827 ("M" ?$,1(L(B) | |
828 ("<" ?$,1(1(B) | |
829 (">" ?$,1(N(B) | |
830 ("?" ?,) | |
831 ("\\" ?$,1)Q(B) | |
832 ("|" ?$,1)P(B)) | |
18673 | 833 ;; |
834 | |
46499 | 835 ;; Alexander Mikhailian says this is of limited use. It has been |
836 ;; popular among emigrants or foreigners who have to type in Cyrillic | |
837 ;; (mostly Russian) from time to time. | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
838 (quail-define-package |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
839 "cyrillic-yawerty" "Cyrillic" ",L6O(B" nil |
89483 | 840 ",LO25@BK(B Roman transcription |
18673 | 841 |
46499 | 842 This layout is based on Roman transcription by phonemic resemblance. |
18673 | 843 When preceded by a '/', the second and the third rows (number key row) change |
844 as follows. | |
845 | |
846 keytop | Q W E R T Y U I O P A S D | |
847 --------+--------------------------------------- | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
848 input | ,L"(B ,L#(B ,L$(B ,L%(B ,L&(B ,L'(B ,L((B ,L)(B ,L*(B ,L+(B ,L,(B ,L.(B ,L/(B" |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
849 nil t t t t nil nil nil nil nil t) |
18673 | 850 |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
851 ;; 1! 2,Lq(B 3,Lj(B 4,L!(B 5% 6^ 7& 8* 9( 0) -_ ,LG(B ,LN(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
852 ;; ,LO(B ,L2(B ,L5(B ,L@(B ,LB(B ,LK(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,LI(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
853 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L9(B ,L:(B ,L;(B ;: '" ,LM(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
854 ;; ,L7(B ,LL(B ,LF(B ,L6(B ,L1(B ,L=(B ,L<(B ,< .> /? |
18673 | 855 |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
856 ;; 1! 2,Lq(B 3,Lj(B 4,L!(B 5% 6^ 7& 8* 9( 0) -_ ,LG(B ,LN(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
857 ;; ,L"(B ,L#(B ,L$(B ,L%(B ,L&(B ,L'(B ,L((B ,L)(B ,L*(B ,L+(B ,LH(B ,LI(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
858 ;; ,L,(B ,L.(B ,L/(B ,LD(B ,L3(B ,LE(B ,L9(B ,L:(B ,L;(B ;: '" ,LM(B |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
859 ;; ,L7(B ,LL(B ,LF(B ,L6(B ,L1(B ,L=(B ,L<(B ,< .> /? |
18673 | 860 |
861 (quail-define-rules | |
862 ("1" ?1) | |
863 ("2" ?2) | |
864 ("3" ?3) | |
865 ("4" ?4) | |
866 ("5" ?5) | |
867 ("6" ?6) | |
868 ("7" ?7) | |
869 ("8" ?8) | |
870 ("9" ?9) | |
871 ("0" ?0) | |
872 ("-" ?-) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
873 ("=" ?,Lg(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
874 ("`" ?,Ln(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
875 ("q" ?,Lo(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
876 ("w" ?,LR(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
877 ("e" ?,LU(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
878 ("r" ?,L`(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
879 ("t" ?,Lb(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
880 ("y" ?,Lk(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
881 ("u" ?,Lc(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
882 ("i" ?,LX(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
883 ("o" ?,L^(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
884 ("p" ?,L_(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
885 ("[" ?,Lh(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
886 ("]" ?,Li(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
887 ("a" ?,LP(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
888 ("s" ?,La(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
889 ("d" ?,LT(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
890 ("f" ?,Ld(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
891 ("g" ?,LS(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
892 ("h" ?,Le(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
893 ("j" ?,LY(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
894 ("k" ?,LZ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
895 ("l" ?,L[(B) |
18673 | 896 (";" ?\;) |
897 ("'" ?') | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
898 ("\\" ?,Lm(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
899 ("z" ?,LW(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
900 ("x" ?,Ll(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
901 ("c" ?,Lf(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
902 ("v" ?,LV(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
903 ("b" ?,LQ(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
904 ("n" ?,L](B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
905 ("m" ?,L\(B) |
18673 | 906 ("," ?,) |
907 ("." ?.) | |
908 ("/" ?/) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
909 |
18673 | 910 ("!" ?!) |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
911 ("@" ?,Lq(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
912 ("#" ?,Lj(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
913 ("$" ?,L!(B) |
18673 | 914 ("%" ?%) |
915 ("^" ?^) | |
916 ("&" ?&) | |
917 ("*" ?*) | |
918 ("(" ?\() | |
919 (")" ?\)) | |
920 ("_" ?_) | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
921 ("+" ?,LG(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
922 ("~" ?,LN(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
923 ("Q" ?,LO(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
924 ("W" ?,L2(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
925 ("E" ?,L5(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
926 ("R" ?,L@(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
927 ("T" ?,LB(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
928 ("Y" ?,LK(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
929 ("U" ?,LC(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
930 ("I" ?,L8(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
931 ("O" ?,L>(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
932 ("P" ?,L?(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
933 ("{" ?,LH(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
934 ("}" ?,LI(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
935 ("A" ?,L0(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
936 ("S" ?,LA(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
937 ("D" ?,L4(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
938 ("F" ?,LD(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
939 ("G" ?,L3(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
940 ("H" ?,LE(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
941 ("J" ?,L9(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
942 ("K" ?,L:(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
943 ("L" ?,L;(B) |
18673 | 944 (":" ?:) |
945 ("\"" ?\") | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
946 ("|" ?,LM(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
947 ("Z" ?,L7(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
948 ("X" ?,LL(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
949 ("C" ?,LF(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
950 ("V" ?,L6(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
951 ("B" ?,L1(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
952 ("N" ?,L=(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
953 ("M" ?,L<(B) |
18673 | 954 ("<" ?<) |
955 (">" ?>) | |
956 ("?" ??) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
957 |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
958 ("/q" ?,Lr(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
959 ("/w" ?,Ls(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
960 ("/e" ?,Lt(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
961 ("/r" ?,Lu(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
962 ("/t" ?,Lv(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
963 ("/y" ?,Lw(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
964 ("/u" ?,Lx(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
965 ("/i" ?,Ly(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
966 ("/o" ?,Lz(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
967 ("/p" ?,L{(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
968 ("/a" ?,L|(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
969 ("/s" ?,L~(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
970 ("/d" ?,L(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
971 |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
972 ("/Q" ?,L"(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
973 ("/W" ?,L#(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
974 ("/E" ?,L$(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
975 ("/R" ?,L%(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
976 ("/T" ?,L&(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
977 ("/Y" ?,L'(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
978 ("/U" ?,L((B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
979 ("/I" ?,L)(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
980 ("/O" ?,L*(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
981 ("/P" ?,L+(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
982 ("/A" ?,L,(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
983 ("/S" ?,L.(B) |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
984 ("/D" ?,L/(B)) |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
985 |
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
986 ;; This was provided by Valery Alexeev <valery@domovoy.math.uga.edu>. |
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
987 |
46499 | 988 ;; Ognyan Kulev <ogi@fmi.uni-sofia.bg> wrote: |
989 | |
990 ;; I would suggest future `cyrillic-translit' to be with the | |
991 ;; modification of `cyrillic-translit-bulgarian' applied and the | |
992 ;; latter to disappear. It could be used by people who write | |
993 ;; bulgarian e-mails with latin letters for kick start (phonetic input | |
994 ;; method is not so obvious as translit input method but each letter | |
995 ;; is one keypress and a *lot* of people know it). | |
996 | |
997 ;; Anton Zinoviev <anton@lml.bas.bg> wrote: | |
998 ;; I would say that the main idea for cyrillic-translit is to be | |
999 ;; language-independent and universal. It should be able to generate all | |
1000 ;; Cyrillic symbols. | |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1001 (quail-define-package |
66442
1265a199a383
("cyrillic-translit"): Set 4th arg `guidance' to t
Juri Linkov <juri@jurta.org>
parents:
64083
diff
changeset
|
1002 "cyrillic-translit" "Cyrillic" ",L6(Bt" t |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1003 "Intuitively transliterated keyboard layout. |
54481 | 1004 Most convenient for entering Russian, but all Cyrillic characters |
1005 are included. Should handle most cases. However: | |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
1006 for ,Lf(B (TSE) use \"c\", never \"ts\" |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1007 ,Li(B (SHCHA = Bulgarian SHT) = \"shch\", \"sj\", \"/sht\" or \"/t\", |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1008 ,Lm(B (REVERSE ROUNDED E) = \"e\\\" |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
1009 ,Le(B (KHA) when after ,La(B (S) = \"x\" or \"kh\" |
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
1010 ,Lj(B (HARD SIGN) = \"~\", ,LJ(B (CAPITAL HARD SIGN) = \"~~\", |
19153
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1011 ,Ll(B (SOFT SIGN) = \"'\", ,LL(B (CAPITAL SOFT SIGN) = \"''\", |
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1012 ,Lo(B (YA) = \"ya\", \"ja\" or \"q\". |
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1013 |
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1014 Russian alphabet: a b v=w g d e yo=jo zh z i j=j' k l m n o p r s t |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1015 u f h=kh=x c ch sh shch=sj=/s=/sht ~ y ' e\\ yu=ju ya=ja=q |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1016 |
98144
142baa998501
* quail/cyrillic.el ("cyrillic-translit"): Add g' for Ukrainian G with upturn.
Magnus Henoch <mange@freemail.hu>
parents:
96828
diff
changeset
|
1017 Also included are Ukrainian ,Lt(B (YE) = \"/e\", ,Lw(B (YI) = \"yi\", |
142baa998501
* quail/cyrillic.el ("cyrillic-translit"): Add g' for Ukrainian G with upturn.
Magnus Henoch <mange@freemail.hu>
parents:
96828
diff
changeset
|
1018 $,1)Q(B (GHE WITH UPTURN) = \"g'\", |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1019 Belarusian ,L~(B (SHORT U) = \"u~\", |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1020 Serbo-Croatian ,Lr(B (DJE) = \"/d\", ,L{(B (CHJE)= \"/ch\", |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1021 Macedonian ,Ls(B (GJE) = \"/g\", ,Lu(B (DZE) = \"/s\", ,L|(B (KJE) = \"/k\", |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1022 cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\", |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1023 ,Ly(B (LJE) = \"/l\", ,Lz(B (NJE) = \"/n\" and ,L(B (DZE) =\"/z\"." |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
1024 nil t t t t nil nil nil nil nil t) |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1025 |
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1026 (quail-define-rules |
96629
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1027 ("a" ?,LP(B) ("b" ?,LQ(B) ("v" ?,LR(B) ("w" ?,LR(B) ("g" ?,LS(B) ("d" ?,LT(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1028 ("e" ?,LU(B) ("je" ?,LU(B) |
96597
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1029 ("yo" ?,Lq(B) ("jo" ?,Lq(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1030 ("zh" ?,LV(B) ("z" ?,LW(B) ("i" ?,LX(B) |
96598
e7f2743186c2
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
96597
diff
changeset
|
1031 ("j" ?,LY(B) ("j'" ?,LY(B) ("j`" ?,LY(B) ("k" ?,LZ(B) ("l" ?,L[(B) |
96629
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1032 ("m" ?,L\(B) ("n" ?,L](B) ("o" ?,L^(B) ("p" ?,L_(B) ("r" ?,L`(B) ("s" ?,La(B) ("t" ?,Lb(B) ("u" ?,Lc(B) |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1033 ("f" ?,Ld(B) ("x" ?,Le(B) ("h" ?,Le(B) ("kh" ?,Le(B) |
19150
b953b98ae007
Move Quail package cyrillic-jis-russian to
Kenichi Handa <handa@m17n.org>
parents:
19077
diff
changeset
|
1034 ("c" ?,Lf(B) ("ch" ?,Lg(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1035 ("sh" ?,Lh(B) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1036 ("shch" ?,Li(B) ("sj" ?,Li(B) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1037 ("/sht" ?,Li(B) ("/t" ?,Li(B) |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1038 ("~" ?,Lj(B) ("y" ?,Lk(B) ("'" ?,Ll(B) ("`" ?,Ll(B) |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1039 ("e\\" ?,Lm(B) ("e'" ?,Lm(B) ("e`" ?,Lm(B) ("@" ?,Lm(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1040 ("yu" ?,Ln(B) ("ju" ?,Ln(B) |
19153
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1041 ("ya" ?,Lo(B) ("ja" ?,Lo(B) ("q" ?,Lo(B) |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1042 |
96629
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1043 ("A" ?,L0(B) ("B" ?,L1(B) ("V" ?,L2(B) ("W" ?,L2(B) ("G" ?,L3(B) ("D" ?,L4(B) |
96598
e7f2743186c2
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
96597
diff
changeset
|
1044 ("E" ?,L5(B) ("Je" ?,L5(B) ("JE" ?,L5(B) |
96597
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1045 ("Yo" ?,L!(B) ("YO" ?,L!(B) ("Jo" ?,L!(B) ("JO" ?,L!(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1046 ("Zh" ?,L6(B) ("ZH" ?,L6(B) ("Z" ?,L7(B) ("I" ?,L8(B) |
96598
e7f2743186c2
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
96597
diff
changeset
|
1047 ("J" ?,L9(B) ("J'" ?,L9(B) ("J`" ?,L9(B) ("K" ?,L:(B) ("L" ?,L;(B) |
96629
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1048 ("M" ?,L<(B) ("N" ?,L=(B) ("O" ?,L>(B) ("P" ?,L?(B) ("R" ?,L@(B) ("S" ?,LA(B) ("T" ?,LB(B) ("U" ?,LC(B) |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1049 ("F" ?,LD(B) ("X" ?,LE(B) ("H" ?,LE(B) ("Kh" ?,LE(B) ("KH" ?,LE(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1050 ("C" ?,LF(B) ("Ch" ?,LG(B) ("CH" ?,LG(B) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1051 ("Sh" ?,LH(B) ("SH" ?,LH(B) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1052 ("Shch" ?,LI(B) ("SHCH" ?,LI(B) ("Sj" ?,LI(B) ("SJ" ?,LI(B) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1053 ("/Sht" ?,LI(B) ("/SHT" ?,LI(B) ("/T" ?,LI(B) |
96625
75c1c239e05c
("cyrillic-translit"): Fix rules with
Juri Linkov <juri@jurta.org>
parents:
96598
diff
changeset
|
1054 ("~~" ?,LJ(B) ("Y" ?,LK(B) ("''" ?,LL(B) |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1055 ("E\\" ?,LM(B) ("E'" ?,LM(B) ("E`" ?,LM(B) ("@@" ?,LM(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1056 ("Yu" ?,LN(B) ("YU" ?,LN(B) ("Ju" ?,LN(B) ("JU" ?,LN(B) |
19153
6544faf75c9f
(cyrillic-translit): Doc-string of the package
Kenichi Handa <handa@m17n.org>
parents:
19150
diff
changeset
|
1057 ("Ya" ?,LO(B) ("YA" ?,LO(B) ("Ja" ?,LO(B) ("JA" ?,LO(B) ("Q" ?,LO(B) |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1058 |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1059 ("/e" ?,Lt(B) ("yi" ?,Lw(B) ("u'" ?,L~(B) ("u~" ?,L~(B) |
98144
142baa998501
* quail/cyrillic.el ("cyrillic-translit"): Add g' for Ukrainian G with upturn.
Magnus Henoch <mange@freemail.hu>
parents:
96828
diff
changeset
|
1060 ("g'" ?$,1)Q(B) |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1061 ("/d" ?,Lr(B) ("/ch" ?,L{(B) |
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1062 ("/g" ?,Ls(B) ("/s" ?,Lu(B) ("/k" ?,L|(B) |
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1063 ("/i" ?,Lv(B) ("/j" ?,Lx(B) ("/l" ?,Ly(B) ("/n" ?,Lz(B) ("/z" ?,L(B) |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1064 ("/E" ?,L$(B) ("YE" ?,L$(B) ("Yi" ?,L'(B) ("YI" ?,L'(B) ("U'" ?,L.(B) ("U~" ?,L.(B) |
98144
142baa998501
* quail/cyrillic.el ("cyrillic-translit"): Add g' for Ukrainian G with upturn.
Magnus Henoch <mange@freemail.hu>
parents:
96828
diff
changeset
|
1065 ("G'" ?$,1)P(B) |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1066 ("/D" ?,L"(B) ("/Ch" ?,L+(B) ("/CH" ?,L+(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46499
diff
changeset
|
1067 ("/G" ?,L#(B) ("/S" ?,L%(B) ("/K" ?,L,(B) |
19230
f18830dec134
(cyrillic-translit): \\ changed to / to
Richard M. Stallman <rms@gnu.org>
parents:
19153
diff
changeset
|
1068 ("/I" ?,L&(B) ("/J" ?,L((B) ("/L" ?,L)(B) ("/N" ?,L*(B) ("/Z" ?,L/(B) |
95905
6dc2b5331eb0
Add quotation marks, paragraph symbol, angled
Teodor Zlatanov <tzz@lifelogs.com>
parents:
94710
diff
changeset
|
1069 |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1070 ;; Combining accents as a separate character |
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1071 ("//'" ?$(O+Z(B) ("//`" ?$(O+\(B) |
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1072 |
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1073 ;; In the following two rules the accent is not a separate character |
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1074 ("i`" ?$,1(}(B) ("I`" ?$,1(-(B) |
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1075 |
96629
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1076 ("/-" ?$(G!9(B) ;; EN DASH |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1077 ("/--" ?$(G!7(B) ;; EM DASH |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1078 ("/*" ?$(O#@(B) ;; BULLET |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1079 ("/." ?$,1s$(B) ;; ONE DOT LEADER |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1080 ("/.." ?$(G!-(B) ;; TWO DOT LEADER |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1081 ("/..." ?$A!-(B) ;; HORIZONTAL ELLIPSIS |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1082 ("/,," ?,Y%(B) ;; DOUBLE LOW-9 QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1083 ("/," ?$,1rz(B) ;; SINGLE LOW-9 QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1084 ("/''" ?,Y!(B) ;; RIGHT DOUBLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1085 ("/'" ?,F"(B) ;; RIGHT SINGLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1086 ("/``" ?,Y4(B) ;; LEFT DOUBLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1087 ("/`" ?,F!(B) ;; LEFT SINGLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1088 ("/<<" ?,A+(B) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1089 ("/>>" ?,A;(B) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1090 |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1091 ("/&" ?,A'(B) |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1092 ("/ab" ?,A'(B) ; _,LPQ(B_,LWPf(B |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1093 ("/pa" ?,A'(B) ; _pa_ragraph |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1094 ("/#" ?,Lp(B) |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1095 ("/no" ?,Lp(B) ; _,L]^(B_,L\U`(B |
8264d662e9a2
("cyrillic-translit"): Put combining accent rules into one group.
Juri Linkov <juri@jurta.org>
parents:
96625
diff
changeset
|
1096 |
96597
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1097 ("/c" ?,A)(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1098 ("/tm" ?$(D"o(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1099 ("/reg" ?,A.(B) |
96828
214cddc470f4
("cyrillic-translit"): Add two rules "//'" and
Juri Linkov <juri@jurta.org>
parents:
96629
diff
changeset
|
1100 ("/eu" ?,b$(B) |
96597
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1101 ("/ce" ?,A"(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1102 |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1103 ;; fractions |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1104 ("/78" ?$(C(~(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1105 ("/58" ?$(C(}(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1106 ("/38" ?$(C(|(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1107 ("/18" ?$(C({(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1108 ("/56" ?$,1v:(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1109 ("/16" ?$,1v9(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1110 ("/45" ?$,1v8(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1111 ("/35" ?$,1v7(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1112 ("/25" ?$,1v6(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1113 ("/15" ?$(O'z(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1114 ("/23" ?$(O'y(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1115 ("/13" ?$(O'x(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1116 ("/34" ?,A>(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1117 ("/12" ?,A=(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1118 ("/14" ?,A<(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1119 |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1120 ;; Roman numerals, commonly used for months and section/subsection numbers |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1121 ("/RI" ?$A"q(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1122 ("/RII" ?$A"r(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1123 ("/RIII" ?$A"s(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1124 ("/RIV" ?$A"t(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1125 ("/RV" ?$A"u(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1126 ("/RVI" ?$A"v(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1127 ("/RVII" ?$A"w(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1128 ("/RVIII" ?$A"x(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1129 ("/RIX" ?$A"y(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1130 ("/RX" ?$A"z(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1131 ("/RXI" ?$A"{(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1132 ("/RXII" ?$A"|(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1133 |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1134 ("/ri" ?$(G&5(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1135 ("/rii" ?$(G&6(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1136 ("/riii" ?$(G&7(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1137 ("/riv" ?$(G&8(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1138 ("/rv" ?$(G&9(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1139 ("/rvi" ?$(G&:(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1140 ("/rvii" ?$(G&;(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1141 ("/rviii" ?$(G&<(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1142 ("/rix" ?$(G&=(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1143 ("/rx" ?$(G&>(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1144 ("/rxi" ?$(O,?(B) |
132b7b7f8292
Add more rules to cyrillic-translit, make
Teodor Zlatanov <tzz@lifelogs.com>
parents:
95905
diff
changeset
|
1145 ("/rxii" ?$(O,@(B) |
19070
944ebdc35ee4
(cyrillic-translit): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
18673
diff
changeset
|
1146 ) |
19077 | 1147 |
46499 | 1148 ;; Originally from Yudit's `Belarusian input table according to |
1149 ;; STB955-94 belarusian standard' (not all) by Alexander Mikhailian | |
1150 ;; <mikhailian@altern.org>, subsequently amended by AM. | |
19386
27eb2e784a5b
(cyrillic-translit-bulgarian): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
19230
diff
changeset
|
1151 (quail-define-package |
46499 | 1152 "belarusian" "Belarusian" "BE" nil |
1153 "$,1(9(F(C(:(5(=(B keyboard layout registered as STB955-94 Belarusian standard. | |
1154 Unicode based." | |
19722
dd39cae4cf0f
For each package, pass t for the SIMPLE
Kenichi Handa <handa@m17n.org>
parents:
19386
diff
changeset
|
1155 nil t t t t nil nil nil nil nil t) |
19386
27eb2e784a5b
(cyrillic-translit-bulgarian): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
19230
diff
changeset
|
1156 |
46499 | 1157 ;; $,1(q(!(B 1! 2" 3N 4; 5% 6: 7? 8* 9( 0) -_ =+ |
54481 | 1158 ;; $,1(9(B $,1(F(B $,1(C(B $,1(:(B $,1(5(B $,1(=(B $,1(3(B $,1(H(B $,1(.(B $,1(7(B $,1(E(B ' |
1159 ;; $,1(D(B $,1(K(B $,1(2(B $,1(0(B $,1(?(B $,1(@(B $,1(>(B $,1(;(B $,1(4(B $,1(6(B $,1(M(B | |
46499 | 1160 ;; $,1(O(B $,1(G(B $,1(A(B $,1(<(B $,1(&(B $,1(B(B $,1(L(B $,1(1(B $,1(N(B ., |
1161 | |
19386
27eb2e784a5b
(cyrillic-translit-bulgarian): New input method.
Richard M. Stallman <rms@gnu.org>
parents:
19230
diff
changeset
|
1162 (quail-define-rules |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1163 ("~" ?$,1(!(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1164 ("@" ?\") |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1165 ("#" ?$,1uV(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1166 ("$" ?\;) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1167 ("%" ?%) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1168 ("^" ?:) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1169 ("&" ??) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1170 ("Q" ?$,1(9(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1171 ("W" ?$,1(F(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1172 ("E" ?$,1(C(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1173 ("R" ?$,1(:(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1174 ("T" ?$,1(5(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1175 ("Y" ?$,1(=(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1176 ("U" ?$,1(3(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1177 ("I" ?$,1(H(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1178 ("O" ?$,1(.(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1179 ("P" ?$,1(7(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1180 ("{" ?$,1(E(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1181 ("}" ?') |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1182 ("A" ?$,1(D(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1183 ("S" ?$,1(K(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1184 ("D" ?$,1(2(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1185 ("F" ?$,1(0(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1186 ("G" ?$,1(?(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1187 ("H" ?$,1(@(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1188 ("J" ?$,1(>(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1189 ("K" ?$,1(;(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1190 ("L" ?$,1(4(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1191 (":" ?$,1(6(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1192 ("\"" ?$,1(M(B) |
46499 | 1193 ("|" ?|) |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1194 ("Z" ?$,1(O(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1195 ("X" ?$,1(G(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1196 ("C" ?$,1(A(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1197 ("V" ?$,1(<(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1198 ("B" ?$,1(&(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1199 ("N" ?$,1(B(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1200 ("M" ?$,1(L(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1201 ("<" ?$,1(1(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1202 (">" ?$,1(N(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1203 ("?" ?,) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1204 |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1205 ("`" ?$,1(q(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1206 ("q" ?$,1(Y(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1207 ("w" ?$,1(f(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1208 ("e" ?$,1(c(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1209 ("r" ?$,1(Z(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1210 ("t" ?$,1(U(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1211 ("y" ?$,1(](B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1212 ("u" ?$,1(S(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1213 ("i" ?$,1(h(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1214 ("o" ?$,1(~(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1215 ("p" ?$,1(W(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1216 ("[" ?$,1(e(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1217 ("]" ?') |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1218 ("a" ?$,1(d(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1219 ("s" ?$,1(k(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1220 ("d" ?$,1(R(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1221 ("f" ?$,1(P(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1222 ("g" ?$,1(_(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1223 ("h" ?$,1(`(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1224 ("j" ?$,1(^(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1225 ("k" ?$,1([(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1226 ("l" ?$,1(T(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1227 (";" ?$,1(V(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1228 ("'" ?$,1(m(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1229 ("z" ?$,1(o(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1230 ("x" ?$,1(g(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1231 ("c" ?$,1(a(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1232 ("v" ?$,1(\(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1233 ("b" ?$,1(v(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1234 ("n" ?$,1(b(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1235 ("m" ?$,1(l(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1236 ("," ?$,1(Q(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1237 ("." ?$,1(n(B) |
46499 | 1238 ("/" ?.)) |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1239 |
42037 | 1240 ;; From `Bulgarian-PHO.kmap for Yudit', Alexander Shopov |
1241 ;; <al_shopov@web.bg>. | |
1242 | |
1243 ;; Extra commentary and the indicator from an independent | |
1244 ;; (cyrillic-iso8859-5) implementation by Ognyan Kulev | |
46499 | 1245 ;; <ogi@fmi.uni-sofia.bg> and name changes from Anton Zinoviev |
1246 ;; <anton@lml.bas.bg>. | |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1247 (quail-define-package |
46499 | 1248 "bulgarian-phonetic" "Bulgarian" "$,1(6(1(D(B" |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1249 nil |
46499 | 1250 "Bulgarian Phonetic keyboard layout, producing Unicode. |
42037 | 1251 |
1252 The layout is similar to `cyrillic-translit', but all Bulgarian | |
46499 | 1253 characters are typed with a single key. |
1254 | |
53674
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1255 Use /& for ,A'(B (Cyrillic paragraph) and /# for $,1uV(B. |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1256 |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1257 The letters $,1(G(B, $,1(H(B, $,1(I(B and $,1(N(B are not affected by Caps Lock." |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1258 nil t t t t nil nil nil nil nil t) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1259 |
53674
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1260 ;; $,1(G(B |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1261 ;; $,1(O(B $,1(2(B $,1(5(B $,1(@(B $,1(B(B $,1(J(B $,1(C(B $,1(8(B $,1(>(B $,1(?(B $,1(H(B $,1(I(B |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1262 ;; $,1(0(B $,1(A(B $,1(4(B $,1(D(B $,1(3(B $,1(E(B $,1(9(B $,1(:(B $,1(;(B $,1(N(B |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1263 ;; $,1(7(B $,1(L(B $,1(F(B $,1(6(B $,1(1(B $,1(=(B $,1(<(B |
42037 | 1264 |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1265 (quail-define-rules |
46499 | 1266 ("/&" ?,A'(B) |
1267 ("/#" ?$,1uV(B) | |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1268 ("A" ?$,1(0(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1269 ("B" ?$,1(1(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1270 ("W" ?$,1(2(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1271 ("G" ?$,1(3(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1272 ("D" ?$,1(4(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1273 ("E" ?$,1(5(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1274 ("V" ?$,1(6(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1275 ("Z" ?$,1(7(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1276 ("I" ?$,1(8(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1277 ("J" ?$,1(9(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1278 ("K" ?$,1(:(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1279 ("L" ?$,1(;(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1280 ("M" ?$,1(<(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1281 ("N" ?$,1(=(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1282 ("O" ?$,1(>(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1283 ("P" ?$,1(?(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1284 ("R" ?$,1(@(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1285 ("S" ?$,1(A(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1286 ("T" ?$,1(B(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1287 ("U" ?$,1(C(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1288 ("F" ?$,1(D(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1289 ("H" ?$,1(E(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1290 ("C" ?$,1(F(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1291 ("~" ?$,1(G(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1292 ("{" ?$,1(H(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1293 ("}" ?$,1(I(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1294 ("Y" ?$,1(J(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1295 ("X" ?$,1(L(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1296 ("|" ?$,1(N(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1297 ("Q" ?$,1(O(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1298 ("a" ?$,1(P(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1299 ("b" ?$,1(Q(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1300 ("w" ?$,1(R(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1301 ("g" ?$,1(S(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1302 ("d" ?$,1(T(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1303 ("e" ?$,1(U(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1304 ("v" ?$,1(V(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1305 ("z" ?$,1(W(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1306 ("i" ?$,1(X(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1307 ("j" ?$,1(Y(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1308 ("k" ?$,1(Z(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1309 ("l" ?$,1([(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1310 ("m" ?$,1(\(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1311 ("n" ?$,1(](B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1312 ("o" ?$,1(^(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1313 ("p" ?$,1(_(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1314 ("r" ?$,1(`(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1315 ("s" ?$,1(a(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1316 ("t" ?$,1(b(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1317 ("u" ?$,1(c(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1318 ("f" ?$,1(d(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1319 ("h" ?$,1(e(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1320 ("c" ?$,1(f(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1321 ("`" ?$,1(g(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1322 ("[" ?$,1(h(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1323 ("]" ?$,1(i(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1324 ("y" ?$,1(j(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1325 ("x" ?$,1(l(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1326 ("\\" ?$,1(n(B) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1327 ("q" ?$,1(o(B)) |
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1328 |
46499 | 1329 ;; Based on an implementation by Ognyan Kulev <ogi@fmi.uni-sofia.bg>. |
1330 ;; This follows XKB bg. | |
1331 | |
1332 (quail-define-package | |
1333 "bulgarian-bds" "Bulgarian" "$,1(1(4(A(B" nil | |
1334 "Bulgarian standard keyboard layout (BDS) | |
1335 | |
53674
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1336 This keyboard layout is standard for Bulgarian typewriters. |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1337 |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1338 The letters $,1(F(B, $,1(<(B, $,1(G(B, $,1(@(B, $,1(;(B, $,1(1(B and $,1(K(B are not affected by Caps Lock. |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1339 |
53717
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1340 In addition to original Bulgarian typewriter layout, keys \\ and | |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1341 are transformed into ' and $,1(K(B respectively. Some keyboards mark these |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1342 keys as being transformed into ( and ) respectively. For ( and ), use |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1343 ` and ~ respectively. This input method follows XKB." |
46499 | 1344 nil t t t t nil nil nil nil nil t) |
1345 | |
53674
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1346 ;; () 1! 2? 3+ 4" 5% 6= 7: 8/ 9_ 0$,1uV(B -I .V |
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1347 ;; ,$,1(k(B $,1(C(B $,1(5(B $,1(8(B $,1(H(B $,1(I(B $,1(:(B $,1(A(B $,1(4(B $,1(7(B $,1(F(B ;,A'(B |
53717
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1348 ;; $,1(L(B $,1(O(B $,1(0(B $,1(>(B $,1(6(B $,1(3(B $,1(B(B $,1(=(B $,1(2(B $,1(<(B $,1(G(B '$,1(K(B |
53674
0980bc3da64e
("bulgarian-phonetic"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
1349 ;; $,1(N(B $,1(9(B $,1(J(B $,1(M(B $,1(D(B $,1(E(B $,1(?(B $,1(@(B $,1(;(B $,1(1(B |
46499 | 1350 |
1351 (quail-define-rules | |
1352 | |
1353 ("1" ?1) ("!" ?!) | |
53717
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1354 ("2" ?2) ("@" ??) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1355 ("3" ?3) ("#" ?+) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1356 ("4" ?4) ("$" ?\") |
46499 | 1357 ("5" ?5) ("%" ?%) |
53717
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1358 ("6" ?6) ("^" ?=) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1359 ("7" ?7) ("&" ?:) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1360 ("8" ?8) ("*" ?/) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1361 ("9" ?9) ("(" ?_) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1362 ("0" ?0) (")" ?$,1uV(B) |
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1363 ("-" ?-) ("_" ?I) |
46499 | 1364 ("=" ?.) ("+" ?V) |
1365 | |
1366 ("q" ?,) ("Q" ?$,1(k(B) | |
1367 ("w" ?$,1(c(B) ("W" ?$,1(C(B) | |
1368 ("e" ?$,1(U(B) ("E" ?$,1(5(B) | |
1369 ("r" ?$,1(X(B) ("R" ?$,1(8(B) | |
1370 ("t" ?$,1(h(B) ("T" ?$,1(H(B) | |
1371 ("y" ?$,1(i(B) ("Y" ?$,1(I(B) | |
1372 ("u" ?$,1(Z(B) ("U" ?$,1(:(B) | |
1373 ("i" ?$,1(a(B) ("I" ?$,1(A(B) | |
1374 ("o" ?$,1(T(B) ("O" ?$,1(4(B) | |
1375 ("p" ?$,1(W(B) ("P" ?$,1(7(B) | |
1376 ("[" ?$,1(f(B) ("{" ?$,1(F(B) | |
53717
fd8f2c0a57c4
("bulgarian-bds"): Docstring fixed.
Kenichi Handa <handa@m17n.org>
parents:
53674
diff
changeset
|
1377 ("]" ?\;) ("}" ?,A'(B) |
46499 | 1378 |
1379 ("a" ?$,1(l(B) ("A" ?$,1(L(B) | |
1380 ("s" ?$,1(o(B) ("S" ?$,1(O(B) | |
1381 ("d" ?$,1(P(B) ("D" ?$,1(0(B) | |
1382 ("f" ?$,1(^(B) ("F" ?$,1(>(B) | |
1383 ("g" ?$,1(V(B) ("G" ?$,1(6(B) | |
1384 ("h" ?$,1(S(B) ("H" ?$,1(3(B) | |
1385 ("j" ?$,1(b(B) ("J" ?$,1(B(B) | |
1386 ("k" ?$,1(](B) ("K" ?$,1(=(B) | |
1387 ("l" ?$,1(R(B) ("L" ?$,1(2(B) | |
1388 (";" ?$,1(\(B) (":" ?$,1(<(B) | |
1389 ("'" ?$,1(g(B) ("\"" ?$,1(G(B) | |
1390 ("`" ?\() ("~" ?\)) | |
1391 | |
1392 ("z" ?$,1(n(B) ("Z" ?$,1(N(B) | |
1393 ("x" ?$,1(Y(B) ("X" ?$,1(9(B) | |
1394 ("c" ?$,1(j(B) ("C" ?$,1(J(B) | |
1395 ("v" ?$,1(m(B) ("V" ?$,1(M(B) | |
1396 ("b" ?$,1(d(B) ("B" ?$,1(D(B) | |
1397 ("n" ?$,1(e(B) ("N" ?$,1(E(B) | |
1398 ("m" ?$,1(_(B) ("M" ?$,1(?(B) | |
1399 ("," ?$,1(`(B) ("<" ?$,1(@(B) | |
1400 ("." ?$,1([(B) (">" ?$,1(;(B) | |
1401 ("/" ?$,1(Q(B) ("?" ?$,1(1(B) | |
1402 ("\\" ?') ("|" ?$,1(K(B)) | |
1403 | |
19077 | 1404 ;; Local Variables: |
40706
3384b7d5e4b3
("bulgarian-pho", "belarusian"): New methods.
Dave Love <fx@gnu.org>
parents:
38453
diff
changeset
|
1405 ;; coding: iso-2022-7bit |
19077 | 1406 ;; End: |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
24947
diff
changeset
|
1407 |
94710
4f1fd208c354
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
91327
diff
changeset
|
1408 ;; arch-tag: e6d34b16-8710-4181-a17e-819a1df0334f |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
24947
diff
changeset
|
1409 ;;; cyrillic.el ends here |