(standard-display-european-internal): Don't fiddle with latin-1 non-break space

[gnu-emacs] / lisp / international / iso-transl.el

diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index cd5151c82ae0db1e8c33329ab936a902bf2e06ed..a071b14b3d291d8735f47e5f04f0efd4cf4781f3 100644 (file)
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -43,7 +43,7 @@
 ;;;###autoload (or key-translation-map (setq key-translation-map (make-sparse-keymap)))
 ;;;###autoload (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map)
 ;;;###autoload (autoload 'iso-transl-ctl-x-8-map "iso-transl" "Keymap for C-x 8 prefix." t 'keymap)
-  
+
 (defvar iso-transl-dead-key-alist
   '((?\' . mute-acute)
     (?\` . mute-grave)
@@ -74,10 +74,6 @@
 ;; The ones beginning with `*' have one-character synonyms, but a
 ;; language-specific table might override the short form for its own use.
 
-;; When a translation is non-ASCII, we use a symbol name
-;; whose "function definition" is a translation, rather than
-;; writing the translation directly here.
-;; That is for the sake of C-x 8 C-h.
 (defvar iso-transl-char-map
   '(("* "   . [? ])
     (" "    . [? ])
@@ -228,7 +224,7 @@ sequence VECTOR.  (VECTOR is normally one character long.)")
      ("c"  . [?ç]))
     ("German"
      ("A"  . [?Ä])
-     ("O"  . [?Ö]) 
+     ("O"  . [?Ö])
      ("U"  . [?Ü])
      ("a"  . [?ä])
      ("o"  . [?ö])
@@ -296,4 +292,5 @@ sequence VECTOR.  (VECTOR is normally one character long.)")
 
 (provide 'iso-transl)
 
+;;; arch-tag: 034cfedf-7ebd-461d-bcd0-5c79e6dc0b61
 ;;; iso-transl.el ends here