[Emacs-diffs] master 3409fe0: Support Capital sharp S in German input methods

[Eli Zaretskii]

branch: master
commit 3409fe0362c52127c52f854a7300f4dde4b8fffe
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Support Capital sharp S in German input methods
    
    * lisp/leim/quail/latin-post.el ("german-postfix"):
    * lisp/leim/quail/latin-pre.el ("german-prefix"): Add Capital
    sharp S.  (Bug#30988)
    
    * etc/NEWS: Mention the support of Capital sharp S.
---
 etc/NEWS                      | 3 +++
 lisp/leim/quail/latin-post.el | 2 ++
 lisp/leim/quail/latin-pre.el  | 3 ++-
 3 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/etc/NEWS b/etc/NEWS
index fd1d04b..046d71b 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -121,6 +121,9 @@ regular expression was previously invalid, but is now 
accepted:
 
    x\{32768\}
 
+---
+** The German prefix and postfix input methods now support Capital sharp S.
+
 
 * Editing Changes in Emacs 27.1
 
diff --git a/lisp/leim/quail/latin-post.el b/lisp/leim/quail/latin-post.el
index de321d6..e3691e7 100644
--- a/lisp/leim/quail/latin-post.el
+++ b/lisp/leim/quail/latin-post.el
@@ -1103,6 +1103,7 @@ szz -> sz
  ("UE" ?Ü)
  ("ue" ?ü)
  ("sz" ?ß)
+ ("SZ" ?ẞ)
 
  ("AEE" ["AE"])
  ("aee" ["ae"])
@@ -1111,6 +1112,7 @@ szz -> sz
  ("UEE" ["UE"])
  ("uee" ["ue"])
  ("szz" ["sz"])
+ ("SZZ" ["SZ"])
  ("ge" ["ge"])
  ("eue" ["eue"])
  ("Eue" ["Eue"])
diff --git a/lisp/leim/quail/latin-pre.el b/lisp/leim/quail/latin-pre.el
index 38011d4..ffa8fd7 100644
--- a/lisp/leim/quail/latin-pre.el
+++ b/lisp/leim/quail/latin-pre.el
@@ -361,13 +361,14 @@ Key translation rules are:
  "german-prefix" "German" "DE>" t
  "German (Deutsch) input method with prefix modifiers
 Key translation rules are:
- \"A -> Ä ->   \"O -> Ö   \"U -> Ü   \"s -> ß
+ \"A -> Ä ->   \"O -> Ö   \"S -> ẞ   \"U -> Ü   \"s -> ß
 " nil t nil nil nil nil nil nil nil nil t)
 
 (quail-define-rules
  ("\"A" ?Ä)
  ("\"O" ?Ö)
  ("\"U" ?Ü)
+ ("\"S" ?ẞ)
  ("\"a" ?ä)
  ("\"o" ?ö)
  ("\"u" ?ü)