master 92ec08bc46: Support keyboard input and display of U+1E9E

[Eli Zaretskii]

branch: master
commit 92ec08bc46b8732283ea08456942811a27f5b7bd
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Support keyboard input and display of U+1E9E
    
    * lisp/international/latin1-disp.el (latin1-display):
    * lisp/international/iso-transl.el (iso-transl-char-map)
    (iso-transl-language-alist): Add U+1E9E capital sharp S.
---
 lisp/international/iso-transl.el  | 2 ++
 lisp/international/latin1-disp.el | 1 +
 2 files changed, 3 insertions(+)

diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index 90fdc06b1e..5e9fd69ea0 100644
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -76,6 +76,7 @@
     ("\"E"  . [?Ë])
     ("\"I"  . [?Ï])
     ("\"O"  . [?Ö])
+    ("\"S"  . [?ẞ])
     ("\"U"  . [?Ü])
     ("\"a"  . [?ä])
     ("\"e"  . [?ë])
@@ -324,6 +325,7 @@ sequence VECTOR.  (VECTOR is normally one character long.)")
     ("German"
      ("A"  . [?Ä])
      ("O"  . [?Ö])
+     ("S"  . [?ẞ])
      ("U"  . [?Ü])
      ("a"  . [?ä])
      ("o"  . [?ö])
diff --git a/lisp/international/latin1-disp.el 
b/lisp/international/latin1-disp.el
index 7054077fb0..af75192793 100644
--- a/lisp/international/latin1-disp.el
+++ b/lisp/international/latin1-disp.el
@@ -124,6 +124,7 @@ display for all of `latin1-display-sets'.  See also
             (?\™ "TM") ;; TRADE MARK SIGN
             (?\› ">") ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
             (?•  "·")
+             (?ẞ "SS") ;; LATIN CAPITAL LETTER SHARP S
             )))
          (setq latin1-display t))
     (mapc #'latin1-display-reset latin1-display-sets)