(latin-2-postfix): Replace comma and period with `. Replace colon with /.

(latin-1-postfix): Replace comma with /.
(french-postfix): Replace comma with /.
(latin-3-postfix): Replace comma with ` and period with /.
(latin-4-postfix): Replace comma with ` and period with ~.
(latin-5-postfix): Replace comma with ` and period with /.
(turkish-postfix): Replace comma with ` and period with /.

diff --git a/leim/quail/latin-post.el b/leim/quail/latin-post.el
index a0901bbc6e0eaba8c8768474ceca0ac5bd9ce600..1541769f196e7b6a23f2a9d133b3b2cec5d67724 100644 (file)
--- a/leim/quail/latin-post.el
+++ b/leim/quail/latin-post.el
@@ -37,10 +37,14 @@
   circumflex |    ^    | a^ -> \e,Ab\e(B
   diaeresis  |    \"    | a\" -> \e,Ad\e(B
   tilde      |    ~    | a~ -> \e,Ac\e(B
-  cedilla    |    ,    | c, -> \e,Ag\e(B
+  cedilla    |    /    | c/ -> \e,Ag\e(B
   nordic     |    /    | d/ -> \e,Ap\e(B   t/ -> \e,A~\e(B   a/ -> \e,Ae\e(B   e/ -> \e,Af\e(B   o/ -> \e,Ax\e(B
   others     |   /<>   | s/ -> \e,A_\e(B   ?/ -> \e,A?\e(B   !/ -> \e,A!\e(B   << -> \e,A+\e(B   >> -> \e,A;\e(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
+letter.
+
 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t nil nil nil nil nil nil nil nil t)
 
@@ -103,8 +107,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("T/" ?\e,A^\e(B)
  ("t/" ?\e,A~\e(B)
  ("s/" ?\e,A_\e(B)
- ("C," ?\e,AG\e(B)
- ("c," ?\e,Ag\e(B)
+ ("C/" ?\e,AG\e(B)
+ ("c/" ?\e,Ag\e(B)
  ("N~" ?\e,AQ\e(B)
  ("n~" ?\e,Aq\e(B)
  ("?/" ?\e,A?\e(B)
@@ -170,8 +174,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("T//" ["T/"])
  ("t//" ["t/"])
  ("s//" ["s/"])
- ("C,," ["C,"])
- ("c,," ["c,"])
+ ("C//" ["C/"])
+ ("c//" ["c/"])
  ("N~~" ["N~"])
  ("n~~" ["n~"])
  ("?//" ["?/"])
@@ -187,34 +191,38 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
              | postfix | examples
  ------------+---------+----------
   acute      |    '    | a' -> \e,Ba\e(B
-  ogonek     |    ,    | a, -> \e,B1\e(B
+  ogonek     |    `    | a` -> \e,B1\e(B
   diaeresis  |    \"    | a\" -> \e,Bd\e(B
   circumflex |    ^    | a^ -> \e,Bb\e(B
   breve      |    ~    | a~ -> \e,Bc\e(B
-  cedilla    |    ,    | c, -> \e,Bg\e(B
+  cedilla    |    `    | c` -> \e,Bg\e(B
   caron      |    ~    | c~ -> \e,Bh\e(B
-  dbl. acute |    :    | o: -> \e,Bu\e(B
-  ring       |    .    | u. -> \e,By\e(B
-  dot        |    .    | z. -> \e,B?\e(B
+  dbl. acute |    \"    | o\" -> \e,Bu\e(B
+  ring       |    `    | u` -> \e,By\e(B
+  dot        |    `    | z` -> \e,B?\e(B
   stroke     |    /    | d/ -> \e,Bp\e(B
   others     |    /    | s/ -> \e,B_\e(B
 
+It would be natural to use period and comma for dots/rings and
+cedillas/ogoneks, but that would inconvenient in practice, because
+periods and commas are needed very often after a letter.
+
 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'" ?\e,BA\e(B)
- ("A," ?\e,B!\e(B)
+ ("A`" ?\e,B!\e(B)
  ("A\"" ?\e,BD\e(B)
  ("A^" ?\e,BB\e(B)
  ("A~" ?\e,BC\e(B)
  ("C'" ?\e,BF\e(B)
- ("C," ?\e,BG\e(B)
+ ("C`" ?\e,BG\e(B)
  ("C~" ?\e,BH\e(B)
  ("D/" ?\e,BP\e(B)
  ("D~" ?\e,BO\e(B)
  ("E'" ?\e,BI\e(B)
- ("E," ?\e,BJ\e(B)
+ ("E`" ?\e,BJ\e(B)
  ("E\"" ?\e,BK\e(B)
  ("E~" ?\e,BL\e(B)
  ("I'" ?\e,BM\e(B)
@@ -225,36 +233,36 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("N'" ?\e,BQ\e(B)
  ("N~" ?\e,BR\e(B)
  ("O'" ?\e,BS\e(B)
- ("O:" ?\e,BU\e(B)
+ ("O\"" ?\e,BU\e(B)
  ("O\"" ?\e,BV\e(B)
  ("O^" ?\e,BT\e(B)
  ("R'" ?\e,B@\e(B)
  ("R~" ?\e,BX\e(B)
  ("S'" ?\e,B&\e(B)
- ("S," ?\e,B*\e(B)
+ ("S`" ?\e,B*\e(B)
  ("S~" ?\e,B)\e(B)
- ("T," ?\e,B^\e(B)
+ ("T`" ?\e,B^\e(B)
  ("T~" ?\e,B+\e(B)
  ("U'" ?\e,BZ\e(B)
- ("U:" ?\e,B[\e(B)
+ ("U\"" ?\e,B[\e(B)
  ("U\"" ?\e,B\\e(B)
- ("U." ?\e,BY\e(B)
+ ("U`" ?\e,BY\e(B)
  ("Y'" ?\e,B]\e(B)
  ("Z'" ?\e,B,\e(B)
- ("Z." ?\e,B/\e(B)
+ ("Z`" ?\e,B/\e(B)
  ("Z~" ?\e,B.\e(B)
  ("a'" ?\e,Ba\e(B)
- ("a," ?\e,B1\e(B)
+ ("a`" ?\e,B1\e(B)
  ("a\"" ?\e,Bd\e(B)
  ("a^" ?\e,Bb\e(B)
  ("a~" ?\e,Bc\e(B)
  ("c'" ?\e,Bf\e(B)
- ("c," ?\e,Bg\e(B)
+ ("c`" ?\e,Bg\e(B)
  ("c~" ?\e,Bh\e(B)
  ("d/" ?\e,Bp\e(B)
  ("d~" ?\e,Bo\e(B)
  ("e'" ?\e,Bi\e(B)
- ("e," ?\e,Bj\e(B)
+ ("e`" ?\e,Bj\e(B)
  ("e\"" ?\e,Bk\e(B)
  ("e~" ?\e,Bl\e(B)
  ("i'" ?\e,Bm\e(B)
@@ -265,38 +273,38 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("n'" ?\e,Bq\e(B)
  ("n~" ?\e,Br\e(B)
  ("o'" ?\e,Bs\e(B)
- ("o:" ?\e,Bu\e(B)
+ ("o\"" ?\e,Bu\e(B)
  ("o\"" ?\e,Bv\e(B)
  ("o^" ?\e,Bt\e(B)
  ("r'" ?\e,B`\e(B)
  ("r~" ?\e,Bx\e(B)
  ("s'" ?\e,B6\e(B)
- ("s," ?\e,B:\e(B)
+ ("s`" ?\e,B:\e(B)
  ("s/" ?\e,B_\e(B)
  ("s~" ?\e,B9\e(B)
- ("t," ?\e,B~\e(B)
+ ("t`" ?\e,B~\e(B)
  ("t~" ?\e,B;\e(B)
  ("u'" ?\e,Bz\e(B)
- ("u:" ?\e,B{\e(B)
+ ("u\"" ?\e,B{\e(B)
  ("u\"" ?\e,B|\e(B)
- ("u." ?\e,By\e(B)
+ ("u`" ?\e,By\e(B)
  ("y'" ?\e,B}\e(B)
  ("z'" ?\e,B<\e(B)
- ("z." ?\e,B?\e(B)
+ ("z`" ?\e,B?\e(B)
  ("z~" ?\e,B>\e(B)
 
  ("A''" ["A'"])
- ("A,," ["A,"])
+ ("A``" ["A`"])
  ("A\"\"" ["A\""])
  ("A^^" ["A^"])
  ("A~~" ["A~"])
  ("C''" ["C'"])
- ("C,," ["C,"])
+ ("C``" ["C`"])
  ("C~~" ["C~"])
  ("D//" ["D/"])
  ("D~~" ["D~"])
  ("E''" ["E'"])
- ("E,," ["E,"])
+ ("E``" ["E`"])
  ("E\"\"" ["E\""])
  ("E~~" ["E~"])
  ("I''" ["I'"])
@@ -313,30 +321,30 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("R''" ["R'"])
  ("R~~" ["R~"])
  ("S''" ["S'"])
- ("S,," ["S,"])
+ ("S``" ["S`"])
  ("S~~" ["S~"])
- ("T,," ["T,"])
+ ("T``" ["T`"])
  ("T~~" ["T~"])
  ("U''" ["U'"])
  ("U::" ["U:"])
  ("U\"\"" ["U\""])
- ("U.." ["U."])
+ ("U``" ["U`"])
  ("Y''" ["Y'"])
  ("Z''" ["Z'"])
- ("Z.." ["Z."])
+ ("Z``" ["Z`"])
  ("Z~~" ["Z~"])
  ("a''" ["a'"])
- ("a,," ["a,"])
+ ("a``" ["a`"])
  ("a\"\"" ["a\""])
  ("a^^" ["a^"])
  ("a~~" ["a~"])
  ("c''" ["c'"])
- ("c,," ["c,"])
+ ("c``" ["c`"])
  ("c~~" ["c~"])
  ("d//" ["d/"])
  ("d~~" ["d~"])
  ("e''" ["e'"])
- ("e,," ["e,"])
+ ("e``" ["e`"])
  ("e\"\"" ["e\""])
  ("e~~" ["e~"])
  ("i''" ["i'"])
@@ -353,18 +361,18 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("r''" ["r'"])
  ("r~~" ["r~"])
  ("s''" ["s'"])
- ("s,," ["s,"])
+ ("s``" ["s`"])
  ("s//" ["s/"])
  ("s~~" ["s~"])
- ("t,," ["t,"])
+ ("t``" ["t`"])
  ("t~~" ["t~"])
  ("u''" ["u'"])
  ("u::" ["u:"])
  ("u\"\"" ["u\""])
- ("u.." ["u."])
+ ("u``" ["u`"])
  ("y''" ["y'"])
  ("z''" ["z'"])
- ("z.." ["z."])
+ ("z``" ["z`"])
  ("z~~" ["z~"])
  )
 
@@ -378,13 +386,17 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
   grave      |    `    | a` -> \e,C`\e(B
   circumflex |    ^    | a^ -> \e,Cb\e(B
   diaeresis  |    \"    | a\" -> \e,Cd\e(B
-  dot        |    .    | c. -> \e,Ce\e(B   i. -> \e,C9\e(B   I. -> \e,C)\e(B
-  cedilla    |    ,    | c, -> \e,Cg\e(B
+  dot        |    /    | c/ -> \e,Ce\e(B   i/ -> \e,C9\e(B   I/ -> \e,C)\e(B
+  cedilla    |    `    | c` -> \e,Cg\e(B
   breve      |    ~    | g~ -> \e,C;\e(B
   tilde      |    ~    | n~ -> \e,Cq\e(B
   stroke     |    /    | h/ -> \e,C1\e(B
   others     |    /    | s/ -> \e,C_\e(B
 
+It would be natural to use period and comma for dots and cedillas, but
+that would inconvenient in practice, because periods and commas are
+needed very often after a letter.
+
 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t nil nil nil nil nil nil nil nil t)
 
@@ -393,19 +405,19 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("A'" ?\e,CA\e(B)
  ("A^" ?\e,CB\e(B)
  ("A\"" ?\e,CD\e(B)
- ("C." ?\e,CE\e(B)
+ ("C/" ?\e,CE\e(B)
  ("C^" ?\e,CF\e(B)
- ("C," ?\e,CG\e(B)
+ ("C`" ?\e,CG\e(B)
  ("E`" ?\e,CH\e(B)
  ("E'" ?\e,CI\e(B)
  ("E^" ?\e,CJ\e(B)
  ("E\"" ?\e,CK\e(B)
  ("G~" ?\e,C+\e(B)
- ("G." ?\e,CU\e(B)
+ ("G/" ?\e,CU\e(B)
  ("G^" ?\e,CX\e(B)
  ("H/" ?\e,C!\e(B)
  ("H^" ?\e,C&\e(B)
- ("I." ?\e,C)\e(B)
+ ("I/" ?\e,C)\e(B)
  ("I`" ?\e,CL\e(B)
  ("I'" ?\e,CM\e(B)
  ("I^" ?\e,CN\e(B)
@@ -416,31 +428,31 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("O'" ?\e,CS\e(B)
  ("O^" ?\e,CT\e(B)
  ("O\"" ?\e,CV\e(B)
- ("S," ?\e,C*\e(B)
+ ("S`" ?\e,C*\e(B)
  ("S^" ?\e,C^\e(B)
  ("U`" ?\e,CY\e(B)
  ("U'" ?\e,CZ\e(B)
  ("U^" ?\e,C[\e(B)
  ("U\"" ?\e,C\\e(B)
  ("U~" ?\e,C]\e(B)
- ("Z." ?\e,C/\e(B)
+ ("Z/" ?\e,C/\e(B)
  ("a`" ?\e,C`\e(B)
  ("a'" ?\e,Ca\e(B)
  ("a^" ?\e,Cb\e(B)
  ("a\"" ?\e,Cd\e(B)
- ("c." ?\e,Ce\e(B)
+ ("c/" ?\e,Ce\e(B)
  ("c^" ?\e,Cf\e(B)
- ("c," ?\e,Cg\e(B)
+ ("c`" ?\e,Cg\e(B)
  ("e`" ?\e,Ch\e(B)
  ("e'" ?\e,Ci\e(B)
  ("e^" ?\e,Cj\e(B)
  ("e\"" ?\e,Ck\e(B)
  ("g~" ?\e,C;\e(B)
- ("g." ?\e,Cu\e(B)
+ ("g/" ?\e,Cu\e(B)
  ("g^" ?\e,Cx\e(B)
  ("h/" ?\e,C1\e(B)
  ("h^" ?\e,C6\e(B)
- ("i." ?\e,C9\e(B)
+ ("i/" ?\e,C9\e(B)
  ("i`" ?\e,Cl\e(B)
  ("i'" ?\e,Cm\e(B)
  ("i^" ?\e,Cn\e(B)
@@ -451,7 +463,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("o'" ?\e,Cs\e(B)
  ("o^" ?\e,Ct\e(B)
  ("o\"" ?\e,Cv\e(B)
- ("s," ?\e,C:\e(B)
+ ("s`" ?\e,C:\e(B)
  ("s/" ?\e,C_\e(B)
  ("s^" ?\e,C~\e(B)
  ("u`" ?\e,Cy\e(B)
@@ -459,25 +471,25 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("u^" ?\e,C{\e(B)
  ("u\"" ?\e,C|\e(B)
  ("u~" ?\e,C}\e(B)
- ("z." ?\e,C?\e(B)
+ ("z/" ?\e,C?\e(B)
 
  ("A``" ["A`"])
  ("A''" ["A'"])
  ("A^^" ["A^"])
  ("A\"\"" ["A\""])
- ("C.." ["C."])
+ ("C//" ["C/"])
  ("C^^" ["C^"])
- ("C,," ["C,"])
+ ("C``" ["C`"])
  ("E``" ["E`"])
  ("E''" ["E'"])
  ("E^^" ["E^"])
  ("E\"\"" ["E\""])
  ("G~~" ["G~"])
- ("G.." ["G."])
+ ("G//" ["G/"])
  ("G^^" ["G^"])
  ("H//" ["H/"])
  ("H^^" ["H^"])
- ("I.." ["I."])
+ ("I//" ["I/"])
  ("I``" ["I`"])
  ("I''" ["I'"])
  ("I^^" ["I^"])
@@ -488,31 +500,31 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("O''" ["O'"])
  ("O^^" ["O^"])
  ("O\"\"" ["O\""])
- ("S,," ["S,"])
+ ("S``" ["S`"])
  ("S^^" ["S^"])
  ("U``" ["U`"])
  ("U''" ["U'"])
  ("U^^" ["U^"])
  ("U\"\"" ["U\""])
  ("U~~" ["U~"])
- ("Z.." ["Z."])
+ ("Z//" ["Z/"])
  ("a``" ["a`"])
  ("a''" ["a'"])
  ("a^^" ["a^"])
  ("a\"\"" ["a\""])
- ("c.." ["c."])
+ ("c//" ["c/"])
  ("c^^" ["c^"])
- ("c,," ["c,"])
+ ("c``" ["c`"])
  ("e``" ["e`"])
  ("e''" ["e'"])
  ("e^^" ["e^"])
  ("e\"\"" ["e\""])
  ("g~~" ["g~"])
- ("g.." ["g."])
+ ("g//" ["g/"])
  ("g^^" ["g^"])
  ("h//" ["h/"])
  ("h^^" ["h^"])
- ("i.." ["i."])
+ ("i//" ["i/"])
  ("i``" ["i`"])
  ("i''" ["i'"])
  ("i^^" ["i^"])
@@ -523,7 +535,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("o''" ["o'"])
  ("o^^" ["o^"])
  ("o\"\"" ["o\""])
- ("s,," ["s,"])
+ ("s``" ["s`"])
  ("s//" ["s/"])
  ("s^^" ["s^"])
  ("u``" ["u`"])
@@ -531,7 +543,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("u^^" ["u^"])
  ("u\"\"" ["u\""])
  ("u~~" ["u~"])
- ("z.." ["z."])
+ ("z//" ["z/"])
  )
 
 (quail-define-package
@@ -543,21 +555,25 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
   acute      |    '    | a' -> \e,Da\e(B
   circumflex |    ^    | a^ -> \e,Db\e(B
   diaeresis  |    \"    | a\" -> \e,Dd\e(B
-  ogonek     |    ,    | a, -> \e,D1\e(B
+  ogonek     |    `    | a` -> \e,D1\e(B
   macron     |    -    | a- -> \e,D`\e(B
   tilde      |    ~    | a~ -> \e,Dc\e(B
   caron      |    ~    | c~ -> \e,Dh\e(B
-  dot        |    .    | e. -> \e,Dl\e(B
-  cedilla    |    ,    | k, -> \e,Ds\e(B   g, -> \e,D;\e(B
+  dot        |    ~    | e~ -> \e,Dl\e(B
+  cedilla    |    `    | k` -> \e,Ds\e(B   g` -> \e,D;\e(B
   stroke     |    /    | d/ -> \e,Dp\e(B
   nordic     |    /    | a/ -> \e,De\e(B   e/ -> \e,Df\e(B   o/ -> \e,Dx\e(B
   others     |    /    | s/ -> \e,D_\e(B   n/ -> \e,D?\e(B   k/ -> \e,D"\e(B
 
+It would be natural to use period and comma for dots and
+cedillas/ogoneks, but that would inconvenient in practice, because
+periods and commas are needed very often after a letter.
+
 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," ?\e,D!\e(B)
+ ("A`" ?\e,D!\e(B)
  ("A-" ?\e,D@\e(B)
  ("A'" ?\e,DA\e(B)
  ("A^" ?\e,DB\e(B)
@@ -569,35 +585,35 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("E/" ?\e,DF\e(B)
  ("E-" ?\e,D*\e(B)
  ("E'" ?\e,DI\e(B)
- ("E," ?\e,DJ\e(B)
+ ("E`" ?\e,DJ\e(B)
  ("E\"" ?\e,DK\e(B)
- ("E." ?\e,DL\e(B)
- ("G," ?\e,D+\e(B)
+ ("E~" ?\e,DL\e(B)
+ ("G`" ?\e,D+\e(B)
  ("I~" ?\e,D%\e(B)
- ("I," ?\e,DG\e(B)
+ ("I`" ?\e,DG\e(B)
  ("I'" ?\e,DM\e(B)
  ("I^" ?\e,DN\e(B)
  ("I-" ?\e,DO\e(B)
- ("K," ?\e,DS\e(B)
- ("L," ?\e,D&\e(B)
+ ("K`" ?\e,DS\e(B)
+ ("L`" ?\e,D&\e(B)
  ("N/" ?\e,D=\e(B)
- ("N," ?\e,DQ\e(B)
+ ("N`" ?\e,DQ\e(B)
  ("O-" ?\e,DR\e(B)
  ("O^" ?\e,DT\e(B)
  ("O~" ?\e,DU\e(B)
  ("O\"" ?\e,DV\e(B)
  ("O/" ?\e,DX\e(B)
- ("R," ?\e,D#\e(B)
+ ("R`" ?\e,D#\e(B)
  ("S~" ?\e,D)\e(B)
  ("T/" ?\e,D,\e(B)
- ("U," ?\e,DY\e(B)
+ ("U`" ?\e,DY\e(B)
  ("U'" ?\e,DZ\e(B)
  ("U^" ?\e,D[\e(B)
  ("U\"" ?\e,D\\e(B)
  ("U~" ?\e,D]\e(B)
  ("U-" ?\e,D^\e(B)
  ("Z~" ?\e,D.\e(B)
- ("a," ?\e,D1\e(B)
+ ("a`" ?\e,D1\e(B)
  ("a-" ?\e,D`\e(B)
  ("a'" ?\e,Da\e(B)
  ("a^" ?\e,Db\e(B)
@@ -609,30 +625,30 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("e/" ?\e,Df\e(B)
  ("e-" ?\e,D:\e(B)
  ("e'" ?\e,Di\e(B)
- ("e," ?\e,Dj\e(B)
+ ("e`" ?\e,Dj\e(B)
  ("e\"" ?\e,Dk\e(B)
- ("e." ?\e,Dl\e(B)
- ("g," ?\e,D;\e(B)
+ ("e~" ?\e,Dl\e(B)
+ ("g`" ?\e,D;\e(B)
  ("i~" ?\e,D5\e(B)
- ("i," ?\e,Dg\e(B)
+ ("i`" ?\e,Dg\e(B)
  ("i'" ?\e,Dm\e(B)
  ("i^" ?\e,Dn\e(B)
  ("i-" ?\e,Do\e(B)
  ("k/" ?\e,D"\e(B)
- ("k," ?\e,Ds\e(B)
- ("l," ?\e,D6\e(B)
+ ("k`" ?\e,Ds\e(B)
+ ("l`" ?\e,D6\e(B)
  ("n/" ?\e,D?\e(B)
- ("n," ?\e,Dq\e(B)
+ ("n`" ?\e,Dq\e(B)
  ("o-" ?\e,Dr\e(B)
  ("o^" ?\e,Dt\e(B)
  ("o~" ?\e,Du\e(B)
  ("o\"" ?\e,Dv\e(B)
  ("o/" ?\e,Dx\e(B)
- ("r," ?\e,D3\e(B)
+ ("r`" ?\e,D3\e(B)
  ("s/" ?\e,D_\e(B)
  ("s~" ?\e,D9\e(B)
  ("t/" ?\e,D<\e(B)
- ("u," ?\e,Dy\e(B)
+ ("u`" ?\e,Dy\e(B)
  ("u'" ?\e,Dz\e(B)
  ("u^" ?\e,D{\e(B)
  ("u\"" ?\e,D|\e(B)
@@ -640,7 +656,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("u-" ?\e,D~\e(B)
  ("z~" ?\e,D>\e(B)
 
- ("A,," ["A,"])
+ ("A``" ["A`"])
  ("A--" ["A-"])
  ("A''" ["A'"])
  ("A^^" ["A^"])
@@ -652,35 +668,35 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("E//" ["E/"])
  ("E--" ["E-"])
  ("E''" ["E'"])
- ("E,," ["E,"])
+ ("E``" ["E`"])
  ("E\"\"" ["E\""])
- ("E.." ["E."])
- ("G,," ["G,"])
+ ("E~~" ["E~"])
+ ("G``" ["G`"])
  ("I~~" ["I~"])
- ("I,," ["I,"])
+ ("I``" ["I`"])
  ("I''" ["I'"])
  ("I^^" ["I^"])
  ("I--" ["I-"])
- ("K,," ["K,"])
- ("L,," ["L,"])
+ ("K``" ["K`"])
+ ("L``" ["L`"])
  ("N//" ["N/"])
- ("N,," ["N,"])
+ ("N``" ["N`"])
  ("O--" ["O-"])
  ("O^^" ["O^"])
  ("O~~" ["O~"])
  ("O\"\"" ["O\""])
  ("O//" ["O/"])
- ("R,," ["R,"])
+ ("R``" ["R`"])
  ("S~~" ["S~"])
  ("T//" ["T/"])
- ("U,," ["U,"])
+ ("U``" ["U`"])
  ("U''" ["U'"])
  ("U^^" ["U^"])
  ("U\"\"" ["U\""])
  ("U~~" ["U~"])
  ("U--" ["U-"])
  ("Z~~" ["Z~"])
- ("a,," ["a,"])
+ ("a``" ["a`"])
  ("a--" ["a-"])
  ("a''" ["a'"])
  ("a^^" ["a^"])
@@ -692,30 +708,30 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("e//" ["e/"])
  ("e--" ["e-"])
  ("e''" ["e'"])
- ("e,," ["e,"])
+ ("e``" ["e`"])
  ("e\"\"" ["e\""])
- ("e.." ["e."])
- ("g,," ["g,"])
+ ("e~~" ["e~"])
+ ("g``" ["g`"])
  ("i~~" ["i~"])
- ("i,," ["i,"])
+ ("i``" ["i`"])
  ("i''" ["i'"])
  ("i^^" ["i^"])
  ("i--" ["i-"])
  ("k//" ["k/"])
- ("k,," ["k,"])
- ("l,," ["l,"])
+ ("k``" ["k`"])
+ ("l``" ["l`"])
  ("n//" ["n/"])
- ("n,," ["n,"])
+ ("n``" ["n`"])
  ("o--" ["o-"])
  ("o^^" ["o^"])
  ("o~~" ["o~"])
  ("o\"\"" ["o\""])
  ("o//" ["o/"])
- ("r,," ["r,"])
+ ("r``" ["r`"])
  ("s//" ["s/"])
  ("s~~" ["s~"])
  ("t//" ["t/"])
- ("u,," ["u,"])
+ ("u``" ["u`"])
  ("u''" ["u'"])
  ("u^^" ["u^"])
  ("u\"\"" ["u\""])
@@ -736,11 +752,15 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
   diaeresis  |    \"    | a\" -> \e,Md\e(B
   tilde      |    ~    | a~ -> \e,Mc\e(B
   breve      |    ~    | g~ -> \e,Mp\e(B
-  cedilla    |    ,    | c, -> \e,Mg\e(B
-  dot        |    .    | i. -> \e,M}\e(B   I. -> \e,M]\e(B
+  cedilla    |    `    | c` -> \e,Mg\e(B
+  dot        |    /    | i/ -> \e,M}\e(B   I/ -> \e,M]\e(B
   nordic     |    /    | a/ -> \e,Me\e(B   e/ -> \e,Mf\e(B   o/ -> \e,Mx\e(B
   others     |    /    | s/ -> \e,M_\e(B
 
+It would be natural to use period and comma for dots and cedillas, but
+that would inconvenient in practice, because periods and commas are
+needed very often after a letter.
+
 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t nil nil nil nil nil nil nil nil t)
 
@@ -751,7 +771,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("A^" ?\e,MB\e(B)
  ("A`" ?\e,M@\e(B)
  ("A~" ?\e,MC\e(B)
- ("C," ?\e,MG\e(B)
+ ("C`" ?\e,MG\e(B)
  ("E'" ?\e,MI\e(B)
  ("E/" ?\e,MF\e(B)
  ("E\"" ?\e,MK\e(B)
@@ -759,7 +779,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("E`" ?\e,MH\e(B)
  ("G~" ?\e,MP\e(B)
  ("I'" ?\e,MM\e(B)
- ("I." ?\e,M]\e(B)
+ ("I/" ?\e,M]\e(B)
  ("I\"" ?\e,MO\e(B)
  ("I^" ?\e,MN\e(B)
  ("I`" ?\e,ML\e(B)
@@ -770,7 +790,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("O^" ?\e,MT\e(B)
  ("O`" ?\e,MR\e(B)
  ("O~" ?\e,MU\e(B)
- ("S," ?\e,M^\e(B)
+ ("S`" ?\e,M^\e(B)
  ("U'" ?\e,MZ\e(B)
  ("U\"" ?\e,M\\e(B)
  ("U^" ?\e,M[\e(B)
@@ -781,7 +801,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("a^" ?\e,Mb\e(B)
  ("a`" ?\e,M`\e(B)
  ("a~" ?\e,Mc\e(B)
- ("c," ?\e,Mg\e(B)
+ ("c`" ?\e,Mg\e(B)
  ("e'" ?\e,Mi\e(B)
  ("e/" ?\e,Mf\e(B)
  ("e\"" ?\e,Mk\e(B)
@@ -789,7 +809,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("e`" ?\e,Mh\e(B)
  ("g~" ?\e,Mp\e(B)
  ("i'" ?\e,Mm\e(B)
- ("i." ?\e,M}\e(B)
+ ("i/" ?\e,M}\e(B)
  ("i\"" ?\e,Mo\e(B)
  ("i^" ?\e,Mn\e(B)
  ("i`" ?\e,Ml\e(B)
@@ -800,7 +820,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("o^" ?\e,Mt\e(B)
  ("o`" ?\e,Mr\e(B)
  ("o~" ?\e,Mu\e(B)
- ("s," ?\e,M~\e(B)
+ ("s`" ?\e,M~\e(B)
  ("s/" ?\e,M_\e(B)
  ("u'" ?\e,Mz\e(B)
  ("u\"" ?\e,M|\e(B)
@@ -814,7 +834,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("A^^" ["A^"])
  ("A``" ["A`"])
  ("A~~" ["A~"])
- ("C,," ["C,"])
+ ("C``" ["C`"])
  ("E''" ["E'"])
  ("E//" ["E/"])
  ("E\"\"" ["E\""])
@@ -822,7 +842,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("E``" ["E`"])
  ("G~~" ["G~"])
  ("I''" ["I'"])
- ("I.." ["I."])
+ ("I//" ["I/"])
  ("I\"\"" ["I\""])
  ("I^^" ["I^"])
  ("I``" ["I`"])
@@ -833,7 +853,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("O^^" ["O^"])
  ("O``" ["O`"])
  ("O~~" ["O~"])
- ("S,," ["S,"])
+ ("S``" ["S`"])
  ("U''" ["U'"])
  ("U\"\"" ["U\""])
  ("U^^" ["U^"])
@@ -844,7 +864,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("a^^" ["a^"])
  ("a``" ["a`"])
  ("a~~" ["a~"])
- ("c,," ["c,"])
+ ("c``" ["c`"])
  ("e''" ["e'"])
  ("e//" ["e/"])
  ("e\"\"" ["e\""])
@@ -852,7 +872,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("e``" ["e`"])
  ("g~~" ["g~"])
  ("i''" ["i'"])
- ("i.." ["i."])
+ ("i//" ["i/"])
  ("i\"\"" ["i\""])
  ("i^^" ["i^"])
  ("i``" ["i`"])
@@ -863,7 +883,7 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("o^^" ["o^"])
  ("o``" ["o`"])
  ("o~~" ["o~"])
- ("s,," ["s,"])
+ ("s``" ["s`"])
  ("s//" ["s/"])
  ("u''" ["u'"])
  ("u\"\"" ["u\""])
@@ -993,7 +1013,7 @@ OEE -> OE
 ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr\e,Ai\e(Bma.
 Par exemple: a` -> \e,A`\e(B, e' -> \e,Ai\e(B.
 
-\e,AG\e(B, \e,A+\e(B, et \e,A;\e(B sont produits par C,, <<, et >>.
+\e,AG\e(B, \e,A+\e(B, et \e,A;\e(B sont produits par C/, <<, et >>.
 
 En doublant la frappe des diacritiques, ils s'isoleront de la lettre.
 Par exemple: e'' -> e'
@@ -1026,8 +1046,8 @@ Par exemple: e'' -> e'
  ("u`" ?\e,Ay\e(B)
  ("u^" ?\e,A{\e(B)
  ("u\"" ?\e,A|\e(B)
- ("C," ?\e,AG\e(B)
- ("c," ?\e,Ag\e(B)
+ ("C/" ?\e,AG\e(B)
+ ("c/" ?\e,Ag\e(B)
  ("<<" ?\e,A+\e(B)
  (">>" ?\e,A;\e(B)
 
@@ -1055,8 +1075,8 @@ Par exemple: e'' -> e'
  ("u``" ["u`"])
  ("u^^" ["u^"])
  ("u\"\"" ["u\""])
- ("C,," ["C,"])
- ("c,," ["c,"])
+ ("C//" ["C/"])
+ ("c//" ["c/"])
  ("<<<" ["<<"])
  (">>>" [">>"])
  )
@@ -1348,14 +1368,14 @@ Doubling the postfix separates the letter and postfix: e.g. aee -> ae
 Note for I, \e,C9\e(B, \e,C)\e(B, i.
 
 A^ -> \e,CB\e(B
-C, -> \e,CG\e(B
+C` -> \e,CG\e(B
 G^ -> \e,C+\e(B
 I  -> I
 i  -> \e,C9\e(B
-I. -> \e,C)\e(B
-i. -> i
+I/ -> \e,C)\e(B
+i/ -> i
 O\" -> \e,CV\e(B
-S, -> \e,C*\e(B
+S` -> \e,C*\e(B
 U\" -> \e,C\\e(B
 U^ -> \e,C[\e(B
 
@@ -1365,17 +1385,17 @@ Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
 (quail-define-rules
  ("A^" ?\e,CB\e(B)
  ("a^" ?\e,Cb\e(B)
- ("C," ?\e,CG\e(B)
- ("c," ?\e,Cg\e(B)
+ ("C`" ?\e,CG\e(B)
+ ("c`" ?\e,Cg\e(B)
  ("G^" ?\e,C+\e(B)
  ("g^" ?\e,C;\e(B)
- ("I." ?\e,C)\e(B)
+ ("I/" ?\e,C)\e(B)
  ("i" ?\e,C9\e(B)
- ("i." ?i)
+ ("i/" ?i)
  ("O\"" ?\e,CV\e(B)
  ("o\"" ?\e,Cv\e(B)
- ("S," ?\e,C*\e(B)
- ("s," ?\e,C:\e(B)
+ ("S`" ?\e,C*\e(B)
+ ("s`" ?\e,C:\e(B)
  ("U\"" ?\e,C\\e(B)
  ("u\"" ?\e,C|\e(B)
  ("U^" ?\e,C[\e(B)
@@ -1383,17 +1403,17 @@ Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
 
  ("A^^" ["A^"])
  ("a^^" ["a^"])
- ("C,," ["C,"])
- ("c,," ["c,"])
+ ("C``" ["C`"])
+ ("c``" ["c`"])
  ("G^^" ["G^"])
  ("g^^" ["g^"])
- ("I.." ["I."])
+ ("I//" ["I/"])
  ("i" ["i"])
- ("i.." ["i."])
+ ("i//" ["i/"])
  ("O\"\"" ["O\""])
  ("o\"\"" ["o\""])
- ("S,," ["S,"])
- ("s,," ["s,"])
+ ("S``" ["S`"])
+ ("s``" ["s`"])
  ("U\"\"" ["U\""])
  ("u\"\"" ["u\""])
  ("U^^" ["U^"])