1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00

("latin-prefix"): New.

This commit is contained in:
Dave Love 2002-07-24 19:57:52 +00:00
parent 9718277f77
commit e61ffc362c

View File

@ -980,4 +980,206 @@ For example, the character named `aogonek' is obtained by `/a'."
("^r" ?,_.(B)
("^c" ?,_)(B))
(quail-define-package
"latin-prefix" "Latin" "L>" t
"Latin characters input method with prefix modifiers.
This is the union of various input methods originally made for input
of characters from a single Latin-N charset.
effect | prefix | examples
------------+--------+----------
acute | ' | 'a -> ,Aa(B, '' -> ,A4(B
grave | ` | `a -> ,A`(B
circumflex | ^ | ^a -> ,Ab(B
diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B
tilde | ~ | ~a -> ,Ac(B
cedilla | ~ | ~c -> ,Ag(B
breve | ~ | ~a -> $,1 #(B
caron | ~ | ~c -> $,1 -(B
dot above | ~ / . | ~o -> $,1 A(B /o -> $,1 A(B .o -> $,1 A(B
misc | \" ~ / | \"s -> ,A_(B ~d -> ,Ap(B ~t -> ,A~(B /a -> ,Ae(B /e -> ,Af(B /o -> ,Ax(B
symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B ~~ -> ,A8(B
symbol | _ / | _o -> ,A:(B _a -> ,A*(B // -> ,A0(B /\\ -> ,AW(B _y -> ,A%(B
symbol | ^ | ^r -> ,A.(B ^c -> ,A)(B ^1 -> ,A9(B ^2 -> ,A2(B ^3 -> ,A3(B
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("' " ?')
("''" ?,A4(B)
("'A" ?,AA(B)
("'E" ?,AI(B)
("'I" ?,AM(B)
("'O" ?,AS(B)
("'U" ?,AZ(B)
("'W" ?$,1nb(B)
("'Y" ?,A](B)
("'a" ?,Aa(B)
("'e" ?,Ai(B)
("'i" ?,Am(B)
("'o" ?,As(B)
("'u" ?,Az(B)
("'w" ?$,1nc(B)
("'y" ?,A}(B)
(".B" ?$,1mB(B)
(".C" ?$,1 *(B)
(".D" ?$,1mJ(B)
(".F" ?$,1m^(B)
(".G" ?$,1 @(B)
(".I" ?$,1 P(B)
(".M" ?$,1n (B)
(".P" ?$,1n6(B)
(".S" ?$,1n@(B)
(".T" ?$,1nJ(B)
(".Z" ?$,1!;(B)
(".b" ?$,1mC(B)
(".c" ?$,1 +(B)
(".d" ?$,1mK(B)
(".f" ?$,1m_(B)
(".g" ?$,1 A(B)
(".m" ?$,1n!(B)
(".p" ?$,1n7(B)
(".s" ?$,1nA(B)
(".t" ?$,1nK(B)
(".z" ?$,1!<(B)
("/ " ?/)
("/#" ?,A#(B)
("/$" ?,A$(B)
("/." ?$,1$y(B)
("//" ?,A0(B)
("/2" ?,A=(B)
("/3" ?,A>(B)
("/4" ?,A<(B)
("/=" ?,A,(B)
("/A" ?,AE(B)
("/C" ?$,1 *(B)
("/E" ?,AF(B)
("/G" ?$,1 @(B)
("/H" ?$,1 F(B)
("/I" ?$,1 P(B)
("/O" ?,AX(B)
("/O" ?$,1 r(B)
("/Z" ?$,1!;(B)
("/\\" ?,AW(B)
("/a" ?,Ae(B)
("/c" ?,A"(B)
("/c" ?$,1 +(B)
("/e" ?,Af(B)
("/g" ?$,1 A(B)
("/h" ?$,1 G(B)
("/i" ?$,1 Q(B)
("/o" ?,Ax(B)
("/o" ?$,1 s(B)
("/z" ?$,1!<(B)
("\" " ?\")
("\"A" ?,AD(B)
("\"E" ?,AK(B)
("\"I" ?,AO(B)
("\"O" ?,AV(B)
("\"U" ?,A\(B)
("\"W" ?$,1nd(B)
("\"Y" ?$,1!8(B)
("\"\"" ?,A((B)
("\"a" ?,Ad(B)
("\"e" ?,Ak(B)
("\"i" ?,Ao(B)
("\"o" ?,Av(B)
("\"s" ?,A_(B)
("\"u" ?,A|(B)
("\"w" ?$,1ne(B)
("\"y" ?,A(B)
("^ " ?^)
("^1" ?,A9(B)
("^2" ?,A2(B)
("^3" ?,A3(B)
("^A" ?,AB(B)
("^C" ?$,1 ((B)
("^E" ?,AJ(B)
("^G" ?$,1 <(B)
("^H" ?$,1 D(B)
("^I" ?,AN(B)
("^J" ?$,1 T(B)
("^O" ?,AT(B)
("^S" ?$,1 |(B)
("^U" ?,A[(B)
("^W" ?$,1!4(B)
("^Y" ?$,1!6(B)
("^^" ?^)
("^a" ?,Ab(B)
("^c" ?,A)(B)
("^c" ?$,1 )(B)
("^e" ?,Aj(B)
("^g" ?$,1 =(B)
("^h" ?$,1 E(B)
("^i" ?,An(B)
("^j" ?$,1 U(B)
("^o" ?,At(B)
("^r" ?,A.(B)
("^s" ?$,1 }(B)
("^u" ?,A{(B)
("^w" ?$,1!5(B)
("^y" ?$,1!7(B)
("_+" ?,A1(B)
("_:" ?,Aw(B)
("_a" ?,A*(B)
("_o" ?,A:(B)
("_y" ?,A%(B)
("_ " ?,A (B)
("` " ?`)
("`A" ?,A@(B)
("`E" ?,AH(B)
("`I" ?,AL(B)
("`O" ?,AR(B)
("`U" ?,AY(B)
("`W" ?$,1n`(B)
("`Y" ?$,1or(B)
("``" ?`)
("`a" ?,A`(B)
("`e" ?,Ah(B)
("`i" ?,Al(B)
("`o" ?,Ar(B)
("`u" ?,Ay(B)
("`w" ?$,1na(B)
("`y" ?$,1os(B)
("~ " ?~)
("~!" ?,A!(B)
("~$" ?,A#(B)
("~-" ?,A-(B)
("~." ?,A7(B)
("~<" ?\,A+(B)
("~=" ?,A/(B)
("~>" ?\,A;(B)
("~?" ?,A?(B)
("~A" ?,AC(B)
("~C" ?,AG(B)
("~D" ?,AP(B)
("~G" ?$,1 >(B)
("~N" ?,AQ(B)
("~O" ?,AU(B)
("~O" ?$,1 @(B)
("~S" ?$,1 ~(B)
("~S" ?$,1! (B)
("~T" ?,A^(B)
("~U" ?$,1!,(B)
("~Z" ?$,1!=(B)
("~`" ?$,1$x(B)
("~a" ?,Ac(B)
("~c" ?,Ag(B)
("~d" ?,Ap(B)
("~e" ?$,1tL(B)
("~g" ?$,1 ?(B)
("~n" ?,Aq(B)
("~o" ?,Au(B)
("~o" ?$,1 A(B)
("~p" ?,A6(B)
("~s" ?,A'(B)
("~s" ?$,1 (B)
("~s" ?$,1!!(B)
("~t" ?,A~(B)
("~u" ?,A5(B)
("~u" ?$,1!-(B)
("~x" ?,A$(B)
("~z" ?$,1!>(B)
("~|" ?,A&(B)
("~~" ?,A8(B)
)
;;; latin-pre.el ends here