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)