(iso-languages): For French and Portuguese,

add comma as prefix.  For Latin-3, add period.
Remove unnecessary backslashes before chars that don't need them.

diff --git a/lisp/international/iso-acc.el b/lisp/international/iso-acc.el
index 41ba02117fa61960677b373ac208cdf056b163ab..161bd1708574633ea97c472cd94f9db11a291de3 100644 (file)
--- a/lisp/international/iso-acc.el
+++ b/lisp/international/iso-acc.el
@@ -28,7 +28,7 @@
 ;; Function `iso-accents-mode' activates a minor mode in which
 ;; typewriter "dead keys" are emulated.  The purpose of this emulation
 ;; is to provide a simple means for inserting accented characters
-;; according to the ISO-8859-1 character set.
+;; according to the ISO-8859-1...3 character sets.
 ;;
 ;; In `iso-accents-mode', pseudo accent characters are used to
 ;; introduce accented keys.  The pseudo-accent characters are:
@@ -39,13 +39,17 @@
 ;;   ^  (caret)     -> circumflex
 ;;   ~  (tilde)     -> tilde over the character
 ;;   /  (slash)     -> slash through the character.
-;;                  Also:  /A is A-with-ring and /E is AE ligature.
+;;                     Also:  /A is A-with-ring and /E is AE ligature.
+;; These two are enabled only if you set iso-accents-enable
+;; to include them:
+;;   .  (period)    -> dot over the character (some languages only)
+;;   ,  (cedilla)   -> cedilla under the character (some languages only)
 ;;
 ;; The action taken depends on the key that follows the pseudo accent.
 ;; In general: 
 ;;
 ;;   pseudo-accent + appropriate letter -> accented letter
-;;   pseudo-accent + space -> pseudo-accent
+;;   pseudo-accent + space -> pseudo-accent (except comma and period)
 ;;   pseudo-accent + pseudo-accent -> accent (if available)
 ;;   pseudo-accent + other -> pseudo-accent + other
 ;;
@@ -76,11 +80,13 @@
         (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363) (?u . ?\372)
         (?\  . ?'))
      (?` (?A . ?\300) (?E . ?\310) (?O . ?\322)
-        (?a . ?\340) (?e . ?\350) (?o . ?\362) (?\  . ?`))
-     (?\" (?I . ?\317) (?U . ?\334) (?i . ?\357) (?u . ?\374) (?\  . ?\"))
-     (?\~ (?C . ?\307) (?N . ?\321) (?c . ?\347) (?n . ?\361)
-         (?> . ?\273) (?< . ?\253) (?! . ?\241) (?? . ?\277)
-         (?\  . ?\~)))
+        (?a . ?\340) (?e . ?\350) (?o . ?\362)
+        (?\  . ?`))
+     (?\" (?I . ?\317) (?U . ?\334) (?i . ?\357) (?u . ?\374)
+         (?\  . ?\"))
+     (?~ (?C . ?\307) (?N . ?\321) (?c . ?\347) (?n . ?\361)
+        (?> . ?\273) (?< . ?\253) (?! . ?\241) (?? . ?\277)
+        (?\  . ?\~)))
 
     ("esperanto"
      (?^ (?H . ?\246) (?J . ?\254) (?h . ?\266) (?j . ?\274) (?C . ?\306)
@@ -89,15 +95,20 @@
      (?~ (?U . ?\335) (?u . ?\375) (?\  . ?~)))
 
     ("french"
-     (?' (?E . ?\311) (?C . ?\307) (?e . ?\351) (?c . ?\347) (?\  . ?'))
+     (?' (?E . ?\311) (?C . ?\307) (?e . ?\351) (?c . ?\347)
+        (?\  . ?'))
      (?` (?A . ?\300) (?E . ?\310) (?U . ?\331)
-         (?a . ?\340) (?e . ?\350) (?u . ?\371) (?\  . ?`))
+         (?a . ?\340) (?e . ?\350) (?u . ?\371)
+        (?\  . ?`))
      (?^ (?A . ?\302) (?E . ?\312) (?I . ?\316) (?O . ?\324) (?U . ?\333)
         (?a . ?\342) (?e . ?\352) (?i . ?\356) (?o . ?\364) (?u . ?\373)
         (?\  . ?^))
      (?\" (?E . ?\313) (?I . ?\317)  
-          (?e . ?\353) (?i . ?\357) (?\  . ?\"))
-     (?\~ (?< . ?\253) (?> . ?\273) (?C . ?\307) (?c . ?\347) (?\  . ?\~)))
+          (?e . ?\353) (?i . ?\357)
+         (?\  . ?\"))
+     (?~ (?< . ?\253) (?> . ?\273) (?C . ?\307) (?c . ?\347)
+        (?,  . ?,))
+     (?, (?C . ?\307) (?c . ?\347) (?\  . ?\~)))
 
     ("german"
      (?\" (?A . ?\304) (?O . ?\326) (?U . ?\334)
@@ -111,7 +122,8 @@
     ("latin-1"
      (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
         (?Y . ?\335) (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363)
-        (?u . ?\372) (?y . ?\375) (?' . ?\264) (?\  . ?'))      
+        (?u . ?\372) (?y . ?\375) (?' . ?\264)
+        (?\  . ?'))      
      (?` (?A . ?\300) (?E . ?\310) (?I . ?\314) (?O . ?\322) (?U . ?\331)
         (?a . ?\340) (?e . ?\350) (?i . ?\354) (?o . ?\362) (?u . ?\371)
         (?` . ?`) (?\  . ?`))
@@ -120,14 +132,16 @@
         (?^ . ?^) (?\  . ?^))
      (?\" (?A . ?\304) (?E . ?\313) (?I . ?\317) (?O . ?\326) (?U . ?\334)
          (?a . ?\344) (?e . ?\353) (?i . ?\357) (?o . ?\366) (?s . ?\337)
-         (?u . ?\374) (?y . ?\377) (?\" . ?\250) (?\  . ?\"))
-     (?\~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325)
-         (?T . ?\336) (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361)
-         (?o . ?\365) (?t . ?\376) (?> . ?\273) (?< . ?\253) (?\~ . ?\270)
-         (?! . ?\241) (?? . ?\277)
-         (?\  . ?\~))
-     (?\/ (?A . ?\305) (?E . ?\306) (?O . ?\330) (?a . ?\345) (?e . ?\346)
-         (?o . ?\370) (?\/ . ?\260) (?\  . ?\/)))
+         (?u . ?\374) (?y . ?\377)
+         (?\" . ?\250) (?\  . ?\"))
+     (?~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325)
+        (?T . ?\336) (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361)
+        (?o . ?\365) (?t . ?\376)
+        (?> . ?\273) (?< . ?\253) (?! . ?\241) (?? . ?\277)
+        (?\~ . ?\270) (?\  . ?~))
+     (?/ (?A . ?\305) (?E . ?\306) (?O . ?\330) (?a . ?\345) (?e . ?\346)
+        (?o . ?\370)
+        (?/ . ?\260) (?\  . ?/)))
 
     ("latin-2" latin-iso8859-2
      (?' (?A . ?\301) (?C . ?\306) (?D . ?\320) (?E . ?\311) (?I . ?\315)
@@ -151,16 +165,16 @@
          (?a . ?\344) (?e . ?\353) (?o . ?\366) (?s . ?\337) (?u . ?\374)
          (?\" . ?\250)
          (?\  . ?\"))
-     (?\~ (?A . ?\303) (?C . ?\310) (?D . ?\317) (?L . ?\245) (?N . ?\322)
-         (?O . ?\325) (?R . ?\330) (?S . ?\251) (?T . ?\253) (?U . ?\333)
-         (?Z . ?\256)
-         (?a . ?\343) (?c . ?\350) (?d . ?\357) (?l . ?\265) (?n . ?\362)
-         (?o . ?\365) (?r . ?\370) (?s . ?\271) (?t . ?\273) (?u . ?\373)
-         (?z . ?\276)
-         (?v . ?\242)                  ; v accent
-         (?\~ . ?\242)                 ; v accent
-         (?\. . ?\270)                 ; cedilla accent
-         (?\  . ?\~)))
+     (?~ (?A . ?\303) (?C . ?\310) (?D . ?\317) (?L . ?\245) (?N . ?\322)
+        (?O . ?\325) (?R . ?\330) (?S . ?\251) (?T . ?\253) (?U . ?\333)
+        (?Z . ?\256)
+        (?a . ?\343) (?c . ?\350) (?d . ?\357) (?l . ?\265) (?n . ?\362)
+        (?o . ?\365) (?r . ?\370) (?s . ?\271) (?t . ?\273) (?u . ?\373)
+        (?z . ?\276)
+        (?v . ?\242)                   ; v accent
+        (?\~ . ?\242)                  ; v accent
+        (?\. . ?\270)                  ; cedilla accent
+        (?\  . ?~)))
 
     ("latin-3" latin-iso8859-3
      (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
@@ -169,32 +183,43 @@
      (?` (?A . ?\300) (?E . ?\310) (?I . ?\314) (?O . ?\322) (?U . ?\331)
         (?a . ?\340) (?e . ?\350) (?i . ?\354) (?o . ?\362) (?u . ?\371)
         (?` . ?`) (?\  . ?`))
-     (?^ (?A . ?\302) (?E . ?\312) (?I . ?\316) (?O . ?\324) (?U . ?\333)
-        (?a . ?\342) (?e . ?\352) (?i . ?\356) (?o . ?\364) (?u . ?\373)
-        (?H . ?\246) (?J . ?\254) (?h . ?\266) (?j . ?\274) (?C . ?\306)
-        (?G . ?\330) (?S . ?\336) (?c . ?\346) (?g . ?\370) (?s . ?\376)
+     (?^ (?A . ?\302) (?C . ?\306) (?E . ?\312) (?G . ?\330) (?H . ?\246)
+        (?I . ?\316) (?J . ?\254) (?O . ?\324) (?S . ?\336) (?U . ?\333)
+        (?a . ?\342) (?c . ?\346) (?e . ?\352) (?g . ?\370) (?h . ?\266)
+        (?i . ?\356) (?j . ?\274) (?o . ?\364) (?s . ?\376) (?u . ?\373)
         (?^ . ?^) (?\  . ?^))
      (?\" (?A . ?\304) (?E . ?\313) (?I . ?\317) (?O . ?\326) (?U . ?\334)
-         (?a . ?\344) (?e . ?\353) (?i . ?\357) (?o . ?\366) (?s . ?\337)
-         (?u . ?\374) (?\" . ?\250) (?\  . ?\"))
+         (?a . ?\344) (?e . ?\353) (?i . ?\357) (?o . ?\366) (?u . ?\374)
+         (?s . ?\337)
+         (?\" . ?\250) (?\  . ?\"))
      (?~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325)
         (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361) (?o . ?\365)
         (?$ . ?\245) (?S . ?\252) (?s . ?\272) (?G . ?\253) (?g . ?\273)
-        (?U . ?\335) (?u . ?\375) (?` . ?\242) (?~ . ?\270) (?\  . ?~))
-     (?/ (?H . ?\241) (?# . ?\243) (?$ . ?\244) (?r . ?\256) (?h . ?\261)
-        (?I . ?\251) (?Z . ?\257) (?i . ?\271) (?z . ?\277) (?C . ?\305)
-        (?G . ?\325) (?c . ?\345) (?g . ?\365) (?. . ?\377) (?/ . ?\260)
-        (?\  . ?/)))
+        (?U . ?\335) (?u . ?\375) (?` . ?\242)
+        (?~ . ?\270) (?\  . ?~))
+     (?/ (?C . ?\305) (?G . ?\325) (?H . ?\241) (?I . ?\251) (?Z . ?\257) 
+        (?c . ?\345) (?g . ?\365) (?h . ?\261) (?i . ?\271) (?z . ?\277)
+        (?r . ?\256)
+        (?. . ?\377) (?# . ?\243) (?$ . ?\244)
+        (?/ . ?\260) (?\  . ?/)))
+     (?. (?C . ?\305) (?G . ?\325) (?I . ?\251) (?Z . ?\257)
+        (?c . ?\345) (?g . ?\365) (?z . ?\277)))
 
     ("portuguese"
      (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
         (?C . ?\307) (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363)
-        (?u . ?\372) (?c . ?\347) (?\  . ?'))
-     (?` (?A . ?\300) (?a . ?\340) (?\  . ?`))
-     (?^ (?A . ?\302) (?E . ?\312) (?O . ?\324) (?a . ?\342) (?e . ?\352)
-        (?o . ?\364) (?\  . ?^))
-     (?\" (?U . ?\334) (?u . ?\374) (?\  . ?\"))
-     (?\~ (?A . ?\303) (?O . ?\325) (?a . ?\343) (?o . ?\365) (?\  . ?\~)))
+        (?u . ?\372) (?c . ?\347)
+        (?\  . ?'))
+     (?` (?A . ?\300) (?a . ?\340)
+        (?\  . ?`))
+     (?^ (?A . ?\302) (?E . ?\312) (?O . ?\324)
+        (?a . ?\342) (?e . ?\352) (?o . ?\364)
+        (?\  . ?^))
+     (?\" (?U . ?\334) (?u . ?\374)
+         (?\  . ?\"))
+     (?~ (?A . ?\303) (?O . ?\325) (?a . ?\343) (?o . ?\365)
+        (?\  . ?~))
+     (?, (?c . ?\347) (?C . ?\307) (?, . ?,)))
 
     ("spanish"
      (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)