diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2022-07-31 11:22:29 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2022-07-31 11:22:29 +0300 |
| commit | 92ec08bc46b8732283ea08456942811a27f5b7bd (patch) | |
| tree | 82456f83dcc3864763d008f6cdb4282a2aa2587f | |
| parent | 57100e0a36f6b00670e8f8a003187783b50280c3 (diff) | |
| download | emacs-92ec08bc46b8732283ea08456942811a27f5b7bd.tar.gz | |
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.
| -rw-r--r-- | lisp/international/iso-transl.el | 2 | ||||
| -rw-r--r-- | lisp/international/latin1-disp.el | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index 90fdc06b1e4..5e9fd69ea02 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 7054077fb02..af751927932 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) |