mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-12 16:23:57 +00:00
Code Issues Releases Activity

("latin-1-alt-postfix"): Add a method to enter the

Browse Source 
small superscript underlined o and a.
("italian-alt-postfix"): Change it to something useful and
different from italian-postfix.
This commit is contained in:
Richard M. Stallman 1998-10-13 15:41:11 +00:00
parent 9769549bac
commit 60b2cdb533
1 changed files with 45 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
leim/quail/latin-alt.el
View File

@ -39,7 +39,8 @@
tilde | ~ | a~ -> ,Ac(B
cedilla | / | c/ -> ,Ag(B
nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B
others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B << -> ,A+(B >> -> ,A;(B
others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B
| various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B
It would be natural to use comma for cedillas, but that would be
inconvenient in practice because commas are needed very often after a
@ -115,6 +116,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
("!/" ?,A!(B)
("<<" ?,A+(B)
(">>" ?,A;(B)
("o_" ?,A:(B)
("a_" ?,A*(B)
("A``" ["A`"])
("A''" ["A'"])
@ -182,6 +185,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
("!//" ["!/"])
("<<<" ["<<"])
(">>>" [">>"])
("o__" ["o_"])
("a__" ["a_"])
)
(quail-define-package
@ -1180,37 +1185,71 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
"italian-alt-postfix" "Latin-1" "IT<" t
"Italian (Italiano) input method with postfix modifiers
A` -> ,A@(B
E` -> ,AH(B
I` -> ,AL(B
O` -> ,AR(B
U` -> ,AY(B
a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B
e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B
i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B
o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B
u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B
This method is for purists who like accents the old way.
Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,A@(B)
("A'" ?,AA(B)
("a`" ?,A`(B)
("a'" ?,Aa(B)
("E`" ?,AH(B)
("E'" ?,AI(B)
("e`" ?,Ah(B)
("e'" ?,Ai(B)
("I`" ?,AL(B)
("i`" ?,Al(B)
("I'" ?,AM(B)
("i'" ?,Am(B)
("I^" ?,AN(B)
("i^" ?,An(B)
("O`" ?,AR(B)
("o`" ?,Ar(B)
("O'" ?,AS(B)
("o'" ?,As(B)
("U`" ?,AY(B)
("u`" ?,Ay(B)
("U'" ?,AZ(B)
("u'" ?,Az(B)
("<<" ?,A+(B)
(">>" ?,A;(B)
("o_" ?,A:(B)
("a_" ?,A*(B)
("A``" ["A`"])
("A''" ["A'"])
("a``" ["a`"])
("a''" ["a'"])
("E``" ["E`"])
("E''" ["E'"])
("e``" ["e`"])
("e''" ["e'"])
("I``" ["I`"])
("i``" ["i`"])
("I''" ["I'"])
("i''" ["i'"])
("I^^" ["I^"])
("i^^" ["i^"])
("O``" ["O`"])
("o``" ["o`"])
("O''" ["O'"])
("o''" ["o'"])
("U``" ["U`"])
("u``" ["u`"])
("U''" ["U'"])
("u''" ["u'"])
("<<<" ["<<"])
(">>>" [">>"])
("o__" ["o_"])
("a__" ["a_"])
)
(quail-define-package