Prefer UTF-8 when the encoding shouldn't matter and changes are small.
[bpt/emacs.git] / lisp / international / iso-cvt.el
index 34488db..407ff3a 100644 (file)
@@ -1,4 +1,4 @@
-;;; iso-cvt.el --- translate ISO 8859-1 from/to various encodings -*- coding: iso-latin-1 -*-
+;;; iso-cvt.el --- translate ISO 8859-1 from/to various encodings -*- coding: utf-8 -*-
 ;; This file was formerly called gm-lingo.el.
 
 ;; Copyright (C) 1993-1998, 2000-2013 Free Software Foundation, Inc.
 
 (defvar iso-spanish-trans-tab
   '(
-    ("~n" "ñ")
-    ("\([a-zA-Z]\)#" "\\1ñ")
-    ("~N" "Ñ")
-    ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü")
-    ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü")
-    ("\\([-a-zA-Z]\\)'o" "\\1ó")
-    ("\\([-a-zA-Z]\\)'O" "\\Ó")
-    ("\\([-a-zA-Z]\\)'e" "\\1é")
-    ("\\([-a-zA-Z]\\)'E" "\\1É")
-    ("\\([-a-zA-Z]\\)'a" "\\1á")
+    ("~n" "ñ")
+    ("\([a-zA-Z]\)#" "\\1ñ")
+    ("~N" "Ñ")
+    ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü")
+    ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü")
+    ("\\([-a-zA-Z]\\)'o" "\\1ó")
+    ("\\([-a-zA-Z]\\)'O" "\\Ó")
+    ("\\([-a-zA-Z]\\)'e" "\\1é")
+    ("\\([-a-zA-Z]\\)'E" "\\1É")
+    ("\\([-a-zA-Z]\\)'a" "\\1á")
     ("\\([-a-zA-Z]\\)'A" "\\1A")
-    ("\\([-a-zA-Z]\\)'i" "\\1í")
-    ("\\([-a-zA-Z]\\)'I" "\\1Í")
+    ("\\([-a-zA-Z]\\)'i" "\\1í")
+    ("\\([-a-zA-Z]\\)'I" "\\1Í")
     )
   "Spanish translation table.")
 
@@ -89,14 +89,14 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
 
 (defvar iso-aggressive-german-trans-tab
   '(
-    ("\"a" "ä")
-    ("\"A" "Ä")
-    ("\"o" "ö")
-    ("\"O" "Ö")
-    ("\"u" "ü")
-    ("\"U" "Ü")
-    ("\"s" "ß")
-    ("\\\\3" "ß")
+    ("\"a" "ä")
+    ("\"A" "Ä")
+    ("\"o" "ö")
+    ("\"O" "Ö")
+    ("\"u" "ü")
+    ("\"U" "Ü")
+    ("\"s" "ß")
+    ("\\\\3" "ß")
     )
   "German translation table.
 This table uses an aggressive translation approach
@@ -104,14 +104,14 @@ and may erroneously translate too much.")
 
 (defvar iso-conservative-german-trans-tab
   '(
-    ("\\([-a-zA-Z\"`]\\)\"a" "\\1ä")
-    ("\\([-a-zA-Z\"`]\\)\"A" "\\1Ä")
-    ("\\([-a-zA-Z\"`]\\)\"o" "\\1ö")
-    ("\\([-a-zA-Z\"`]\\)\"O" "\\1Ö")
-    ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü")
-    ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü")
-    ("\\([-a-zA-Z\"`]\\)\"s" "\\1ß")
-    ("\\([-a-zA-Z\"`]\\)\\\\3" "\\1ß")
+    ("\\([-a-zA-Z\"`]\\)\"a" "\\1ä")
+    ("\\([-a-zA-Z\"`]\\)\"A" "\\1Ä")
+    ("\\([-a-zA-Z\"`]\\)\"o" "\\1ö")
+    ("\\([-a-zA-Z\"`]\\)\"O" "\\1Ö")
+    ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü")
+    ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü")
+    ("\\([-a-zA-Z\"`]\\)\"s" "\\1ß")
+    ("\\([-a-zA-Z\"`]\\)\\\\3" "\\1ß")
     )
   "German translation table.
 This table uses a conservative translation approach
@@ -131,65 +131,65 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
 
 (defvar iso-iso2tex-trans-tab
   '(
-    ("ä" "{\\\\\"a}")
-    ("à" "{\\\\`a}")
-    ("á" "{\\\\'a}")
-    ("ã" "{\\\\~a}")
-    ("â" "{\\\\^a}")
-    ("ë" "{\\\\\"e}")
-    ("è" "{\\\\`e}")
-    ("é" "{\\\\'e}")
-    ("ê" "{\\\\^e}")
-    ("ï" "{\\\\\"\\\\i}")
-    ("ì" "{\\\\`\\\\i}")
-    ("í" "{\\\\'\\\\i}")
-    ("î" "{\\\\^\\\\i}")
-    ("ö" "{\\\\\"o}")
-    ("ò" "{\\\\`o}")
-    ("ó" "{\\\\'o}")
-    ("õ" "{\\\\~o}")
-    ("ô" "{\\\\^o}")
-    ("ü" "{\\\\\"u}")
-    ("ù" "{\\\\`u}")
-    ("ú" "{\\\\'u}")
-    ("û" "{\\\\^u}")
-    ("Ä" "{\\\\\"A}")
-    ("À" "{\\\\`A}")
-    ("Á" "{\\\\'A}")
-    ("Ã" "{\\\\~A}")
-    ("Â" "{\\\\^A}")
-    ("Ë" "{\\\\\"E}")
-    ("È" "{\\\\`E}")
-    ("É" "{\\\\'E}")
-    ("Ê" "{\\\\^E}")
-    ("Ï" "{\\\\\"I}")
-    ("Ì" "{\\\\`I}")
-    ("Í" "{\\\\'I}")
-    ("Î" "{\\\\^I}")
-    ("Ö" "{\\\\\"O}")
-    ("Ò" "{\\\\`O}")
-    ("Ó" "{\\\\'O}")
-    ("Õ" "{\\\\~O}")
-    ("Ô" "{\\\\^O}")
-    ("Ü" "{\\\\\"U}")
-    ("Ù" "{\\\\`U}")
-    ("Ú" "{\\\\'U}")
-    ("Û" "{\\\\^U}")
-    ("ñ" "{\\\\~n}")
-    ("Ñ" "{\\\\~N}")
-    ("ç" "{\\\\c c}")
-    ("Ç" "{\\\\c C}")
-    ("ß" "{\\\\ss}")
+    ("ä" "{\\\\\"a}")
+    ("à" "{\\\\`a}")
+    ("á" "{\\\\'a}")
+    ("ã" "{\\\\~a}")
+    ("â" "{\\\\^a}")
+    ("ë" "{\\\\\"e}")
+    ("è" "{\\\\`e}")
+    ("é" "{\\\\'e}")
+    ("ê" "{\\\\^e}")
+    ("ï" "{\\\\\"\\\\i}")
+    ("ì" "{\\\\`\\\\i}")
+    ("í" "{\\\\'\\\\i}")
+    ("î" "{\\\\^\\\\i}")
+    ("ö" "{\\\\\"o}")
+    ("ò" "{\\\\`o}")
+    ("ó" "{\\\\'o}")
+    ("õ" "{\\\\~o}")
+    ("ô" "{\\\\^o}")
+    ("ü" "{\\\\\"u}")
+    ("ù" "{\\\\`u}")
+    ("ú" "{\\\\'u}")
+    ("û" "{\\\\^u}")
+    ("Ä" "{\\\\\"A}")
+    ("À" "{\\\\`A}")
+    ("Á" "{\\\\'A}")
+    ("Ã\83" "{\\\\~A}")
+    ("Â" "{\\\\^A}")
+    ("Ë" "{\\\\\"E}")
+    ("È" "{\\\\`E}")
+    ("É" "{\\\\'E}")
+    ("Ê" "{\\\\^E}")
+    ("Ï" "{\\\\\"I}")
+    ("Ì" "{\\\\`I}")
+    ("Í" "{\\\\'I}")
+    ("Î" "{\\\\^I}")
+    ("Ö" "{\\\\\"O}")
+    ("Ò" "{\\\\`O}")
+    ("Ó" "{\\\\'O}")
+    ("Õ" "{\\\\~O}")
+    ("Ô" "{\\\\^O}")
+    ("Ü" "{\\\\\"U}")
+    ("Ù" "{\\\\`U}")
+    ("Ú" "{\\\\'U}")
+    ("Û" "{\\\\^U}")
+    ("ñ" "{\\\\~n}")
+    ("Ñ" "{\\\\~N}")
+    ("ç" "{\\\\c c}")
+    ("Ç" "{\\\\c C}")
+    ("ß" "{\\\\ss}")
     ("\306" "{\\\\AE}")
     ("\346" "{\\\\ae}")
     ("\305" "{\\\\AA}")
     ("\345" "{\\\\aa}")
     ("\251" "{\\\\copyright}")
-    ("£" "{\\\\pounds}")
-    ("¶" "{\\\\P}")
-    ("§" "{\\\\S}")
-    ("¿" "{?`}")
-    ("¡" "{!`}")
+    ("£" "{\\\\pounds}")
+    ("¶" "{\\\\P}")
+    ("§" "{\\\\S}")
+    ("¿" "{?`}")
+    ("¡" "{!`}")
     )
   "Translation table for translating ISO 8859-1 characters to TeX sequences.")
 
@@ -204,183 +204,183 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
 
 (defvar iso-tex2iso-trans-tab
   '(
-    ("{\\\\\"a}" "ä")
-    ("{\\\\`a}" "à")
-    ("{\\\\'a}" "á")
-    ("{\\\\~a}" "ã")
-    ("{\\\\^a}" "â")
-    ("{\\\\\"e}" "ë")
-    ("{\\\\`e}" "è")
-    ("{\\\\'e}" "é")
-    ("{\\\\^e}" "ê")
-    ("{\\\\\"\\\\i}" "ï")
-    ("{\\\\`\\\\i}" "ì")
-    ("{\\\\'\\\\i}" "í")
-    ("{\\\\^\\\\i}" "î")
-    ("{\\\\\"i}" "ï")
-    ("{\\\\`i}" "ì")
-    ("{\\\\'i}" "í")
-    ("{\\\\^i}" "î")
-    ("{\\\\\"o}" "ö")
-    ("{\\\\`o}" "ò")
-    ("{\\\\'o}" "ó")
-    ("{\\\\~o}" "õ")
-    ("{\\\\^o}" "ô")
-    ("{\\\\\"u}" "ü")
-    ("{\\\\`u}" "ù")
-    ("{\\\\'u}" "ú")
-    ("{\\\\^u}" "û")
-    ("{\\\\\"A}" "Ä")
-    ("{\\\\`A}" "À")
-    ("{\\\\'A}" "Á")
-    ("{\\\\~A}" "Ã")
-    ("{\\\\^A}" "Â")
-    ("{\\\\\"E}" "Ë")
-    ("{\\\\`E}" "È")
-    ("{\\\\'E}" "É")
-    ("{\\\\^E}" "Ê")
-    ("{\\\\\"I}" "Ï")
-    ("{\\\\`I}" "Ì")
-    ("{\\\\'I}" "Í")
-    ("{\\\\^I}" "Î")
-    ("{\\\\\"O}" "Ö")
-    ("{\\\\`O}" "Ò")
-    ("{\\\\'O}" "Ó")
-    ("{\\\\~O}" "Õ")
-    ("{\\\\^O}" "Ô")
-    ("{\\\\\"U}" "Ü")
-    ("{\\\\`U}" "Ù")
-    ("{\\\\'U}" "Ú")
-    ("{\\\\^U}" "Û")
-    ("{\\\\~n}" "ñ")
-    ("{\\\\~N}" "Ñ")
-    ("{\\\\c c}" "ç")
-    ("{\\\\c C}" "Ç")
-    ("\\\\\"a" "ä")
-    ("\\\\`a" "à")
-    ("\\\\'a" "á")
-    ("\\\\~a" "ã")
-    ("\\\\^a" "â")
-    ("\\\\\"e" "ë")
-    ("\\\\`e" "è")
-    ("\\\\'e" "é")
-    ("\\\\^e" "ê")
+    ("{\\\\\"a}" "ä")
+    ("{\\\\`a}" "à")
+    ("{\\\\'a}" "á")
+    ("{\\\\~a}" "ã")
+    ("{\\\\^a}" "â")
+    ("{\\\\\"e}" "ë")
+    ("{\\\\`e}" "è")
+    ("{\\\\'e}" "é")
+    ("{\\\\^e}" "ê")
+    ("{\\\\\"\\\\i}" "ï")
+    ("{\\\\`\\\\i}" "ì")
+    ("{\\\\'\\\\i}" "í")
+    ("{\\\\^\\\\i}" "î")
+    ("{\\\\\"i}" "ï")
+    ("{\\\\`i}" "ì")
+    ("{\\\\'i}" "í")
+    ("{\\\\^i}" "î")
+    ("{\\\\\"o}" "ö")
+    ("{\\\\`o}" "ò")
+    ("{\\\\'o}" "ó")
+    ("{\\\\~o}" "õ")
+    ("{\\\\^o}" "ô")
+    ("{\\\\\"u}" "ü")
+    ("{\\\\`u}" "ù")
+    ("{\\\\'u}" "ú")
+    ("{\\\\^u}" "û")
+    ("{\\\\\"A}" "Ä")
+    ("{\\\\`A}" "À")
+    ("{\\\\'A}" "Á")
+    ("{\\\\~A}" "Ã\83")
+    ("{\\\\^A}" "Â")
+    ("{\\\\\"E}" "Ë")
+    ("{\\\\`E}" "È")
+    ("{\\\\'E}" "É")
+    ("{\\\\^E}" "Ê")
+    ("{\\\\\"I}" "Ï")
+    ("{\\\\`I}" "Ì")
+    ("{\\\\'I}" "Í")
+    ("{\\\\^I}" "Î")
+    ("{\\\\\"O}" "Ö")
+    ("{\\\\`O}" "Ò")
+    ("{\\\\'O}" "Ó")
+    ("{\\\\~O}" "Õ")
+    ("{\\\\^O}" "Ô")
+    ("{\\\\\"U}" "Ü")
+    ("{\\\\`U}" "Ù")
+    ("{\\\\'U}" "Ú")
+    ("{\\\\^U}" "Û")
+    ("{\\\\~n}" "ñ")
+    ("{\\\\~N}" "Ñ")
+    ("{\\\\c c}" "ç")
+    ("{\\\\c C}" "Ç")
+    ("\\\\\"a" "ä")
+    ("\\\\`a" "à")
+    ("\\\\'a" "á")
+    ("\\\\~a" "ã")
+    ("\\\\^a" "â")
+    ("\\\\\"e" "ë")
+    ("\\\\`e" "è")
+    ("\\\\'e" "é")
+    ("\\\\^e" "ê")
     ;; Discard spaces and/or one EOF after macro \i.
     ;; Converting it back will use braces.
-    ("\\\\\"\\\\i *\n\n" "ï\n\n")
-    ("\\\\\"\\\\i *\n?" "ï")
-    ("\\\\`\\\\i *\n\n" "ì\n\n")
-    ("\\\\`\\\\i *\n?" "ì")
-    ("\\\\'\\\\i *\n\n" "í\n\n")
-    ("\\\\'\\\\i *\n?" "í")
-    ("\\\\^\\\\i *\n\n" "î\n\n")
-    ("\\\\^\\\\i *\n?" "î")
-    ("\\\\\"i" "ï")
-    ("\\\\`i" "ì")
-    ("\\\\'i" "í")
-    ("\\\\^i" "î")
-    ("\\\\\"o" "ö")
-    ("\\\\`o" "ò")
-    ("\\\\'o" "ó")
-    ("\\\\~o" "õ")
-    ("\\\\^o" "ô")
-    ("\\\\\"u" "ü")
-    ("\\\\`u" "ù")
-    ("\\\\'u" "ú")
-    ("\\\\^u" "û")
-    ("\\\\\"A" "Ä")
-    ("\\\\`A" "À")
-    ("\\\\'A" "Á")
-    ("\\\\~A" "Ã")
-    ("\\\\^A" "Â")
-    ("\\\\\"E" "Ë")
-    ("\\\\`E" "È")
-    ("\\\\'E" "É")
-    ("\\\\^E" "Ê")
-    ("\\\\\"I" "Ï")
-    ("\\\\`I" "Ì")
-    ("\\\\'I" "Í")
-    ("\\\\^I" "Î")
-    ("\\\\\"O" "Ö")
-    ("\\\\`O" "Ò")
-    ("\\\\'O" "Ó")
-    ("\\\\~O" "Õ")
-    ("\\\\^O" "Ô")
-    ("\\\\\"U" "Ü")
-    ("\\\\`U" "Ù")
-    ("\\\\'U" "Ú")
-    ("\\\\^U" "Û")
-    ("\\\\~n" "ñ")
-    ("\\\\~N" "Ñ")
-    ("\\\\\"{a}" "ä")
-    ("\\\\`{a}" "à")
-    ("\\\\'{a}" "á")
-    ("\\\\~{a}" "ã")
-    ("\\\\^{a}" "â")
-    ("\\\\\"{e}" "ë")
-    ("\\\\`{e}" "è")
-    ("\\\\'{e}" "é")
-    ("\\\\^{e}" "ê")
-    ("\\\\\"{\\\\i}" "ï")
-    ("\\\\`{\\\\i}" "ì")
-    ("\\\\'{\\\\i}" "í")
-    ("\\\\^{\\\\i}" "î")
-    ("\\\\\"{i}" "ï")
-    ("\\\\`{i}" "ì")
-    ("\\\\'{i}" "í")
-    ("\\\\^{i}" "î")
-    ("\\\\\"{o}" "ö")
-    ("\\\\`{o}" "ò")
-    ("\\\\'{o}" "ó")
-    ("\\\\~{o}" "õ")
-    ("\\\\^{o}" "ô")
-    ("\\\\\"{u}" "ü")
-    ("\\\\`{u}" "ù")
-    ("\\\\'{u}" "ú")
-    ("\\\\^{u}" "û")
-    ("\\\\\"{A}" "Ä")
-    ("\\\\`{A}" "À")
-    ("\\\\'{A}" "Á")
-    ("\\\\~{A}" "Ã")
-    ("\\\\^{A}" "Â")
-    ("\\\\\"{E}" "Ë")
-    ("\\\\`{E}" "È")
-    ("\\\\'{E}" "É")
-    ("\\\\^{E}" "Ê")
-    ("\\\\\"{I}" "Ï")
-    ("\\\\`{I}" "Ì")
-    ("\\\\'{I}" "Í")
-    ("\\\\^{I}" "Î")
-    ("\\\\\"{O}" "Ö")
-    ("\\\\`{O}" "Ò")
-    ("\\\\'{O}" "Ó")
-    ("\\\\~{O}" "Õ")
-    ("\\\\^{O}" "Ô")
-    ("\\\\\"{U}" "Ü")
-    ("\\\\`{U}" "Ù")
-    ("\\\\'{U}" "Ú")
-    ("\\\\^{U}" "Û")
-    ("\\\\~{n}" "ñ")
-    ("\\\\~{N}" "Ñ")
-    ("\\\\c{c}" "ç")
-    ("\\\\c{C}" "Ç")
-    ("{\\\\ss}" "ß")
+    ("\\\\\"\\\\i *\n\n" "ï\n\n")
+    ("\\\\\"\\\\i *\n?" "ï")
+    ("\\\\`\\\\i *\n\n" "ì\n\n")
+    ("\\\\`\\\\i *\n?" "ì")
+    ("\\\\'\\\\i *\n\n" "í\n\n")
+    ("\\\\'\\\\i *\n?" "í")
+    ("\\\\^\\\\i *\n\n" "î\n\n")
+    ("\\\\^\\\\i *\n?" "î")
+    ("\\\\\"i" "ï")
+    ("\\\\`i" "ì")
+    ("\\\\'i" "í")
+    ("\\\\^i" "î")
+    ("\\\\\"o" "ö")
+    ("\\\\`o" "ò")
+    ("\\\\'o" "ó")
+    ("\\\\~o" "õ")
+    ("\\\\^o" "ô")
+    ("\\\\\"u" "ü")
+    ("\\\\`u" "ù")
+    ("\\\\'u" "ú")
+    ("\\\\^u" "û")
+    ("\\\\\"A" "Ä")
+    ("\\\\`A" "À")
+    ("\\\\'A" "Á")
+    ("\\\\~A" "Ã\83")
+    ("\\\\^A" "Â")
+    ("\\\\\"E" "Ë")
+    ("\\\\`E" "È")
+    ("\\\\'E" "É")
+    ("\\\\^E" "Ê")
+    ("\\\\\"I" "Ï")
+    ("\\\\`I" "Ì")
+    ("\\\\'I" "Í")
+    ("\\\\^I" "Î")
+    ("\\\\\"O" "Ö")
+    ("\\\\`O" "Ò")
+    ("\\\\'O" "Ó")
+    ("\\\\~O" "Õ")
+    ("\\\\^O" "Ô")
+    ("\\\\\"U" "Ü")
+    ("\\\\`U" "Ù")
+    ("\\\\'U" "Ú")
+    ("\\\\^U" "Û")
+    ("\\\\~n" "ñ")
+    ("\\\\~N" "Ñ")
+    ("\\\\\"{a}" "ä")
+    ("\\\\`{a}" "à")
+    ("\\\\'{a}" "á")
+    ("\\\\~{a}" "ã")
+    ("\\\\^{a}" "â")
+    ("\\\\\"{e}" "ë")
+    ("\\\\`{e}" "è")
+    ("\\\\'{e}" "é")
+    ("\\\\^{e}" "ê")
+    ("\\\\\"{\\\\i}" "ï")
+    ("\\\\`{\\\\i}" "ì")
+    ("\\\\'{\\\\i}" "í")
+    ("\\\\^{\\\\i}" "î")
+    ("\\\\\"{i}" "ï")
+    ("\\\\`{i}" "ì")
+    ("\\\\'{i}" "í")
+    ("\\\\^{i}" "î")
+    ("\\\\\"{o}" "ö")
+    ("\\\\`{o}" "ò")
+    ("\\\\'{o}" "ó")
+    ("\\\\~{o}" "õ")
+    ("\\\\^{o}" "ô")
+    ("\\\\\"{u}" "ü")
+    ("\\\\`{u}" "ù")
+    ("\\\\'{u}" "ú")
+    ("\\\\^{u}" "û")
+    ("\\\\\"{A}" "Ä")
+    ("\\\\`{A}" "À")
+    ("\\\\'{A}" "Á")
+    ("\\\\~{A}" "Ã\83")
+    ("\\\\^{A}" "Â")
+    ("\\\\\"{E}" "Ë")
+    ("\\\\`{E}" "È")
+    ("\\\\'{E}" "É")
+    ("\\\\^{E}" "Ê")
+    ("\\\\\"{I}" "Ï")
+    ("\\\\`{I}" "Ì")
+    ("\\\\'{I}" "Í")
+    ("\\\\^{I}" "Î")
+    ("\\\\\"{O}" "Ö")
+    ("\\\\`{O}" "Ò")
+    ("\\\\'{O}" "Ó")
+    ("\\\\~{O}" "Õ")
+    ("\\\\^{O}" "Ô")
+    ("\\\\\"{U}" "Ü")
+    ("\\\\`{U}" "Ù")
+    ("\\\\'{U}" "Ú")
+    ("\\\\^{U}" "Û")
+    ("\\\\~{n}" "ñ")
+    ("\\\\~{N}" "Ñ")
+    ("\\\\c{c}" "ç")
+    ("\\\\c{C}" "Ç")
+    ("{\\\\ss}" "ß")
     ("{\\\\AE}" "\306")
     ("{\\\\ae}" "\346")
     ("{\\\\AA}" "\305")
     ("{\\\\aa}" "\345")
     ("{\\\\copyright}" "\251")
     ("\\\\copyright{}" "\251")
-    ("{\\\\pounds}" "£" )
-    ("{\\\\P}" "¶" )
-    ("{\\\\S}" "§" )
-    ("\\\\pounds{}" "£" )
-    ("\\\\P{}" "¶" )
-    ("\\\\S{}" "§" )
-    ("{\\?`}" "¿")
-    ("{!`}" "¡")
-    ("\\?`" "¿")
-    ("!`" "¡")
+    ("{\\\\pounds}" "£" )
+    ("{\\\\P}" "¶" )
+    ("{\\\\S}" "§" )
+    ("\\\\pounds{}" "£" )
+    ("\\\\P{}" "¶" )
+    ("\\\\S{}" "§" )
+    ("{\\?`}" "¿")
+    ("{!`}" "¡")
+    ("\\?`" "¿")
+    ("!`" "¡")
     )
   "Translation table for translating TeX sequences to ISO 8859-1 characters.
 This table is not exhaustive (and due to TeX's power can never be).
@@ -397,185 +397,185 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
 
 (defvar iso-gtex2iso-trans-tab
   '(
-    ("{\\\\\"a}" "ä")
-    ("{\\\\`a}" "à")
-    ("{\\\\'a}" "á")
-    ("{\\\\~a}" "ã")
-    ("{\\\\^a}" "â")
-    ("{\\\\\"e}" "ë")
-    ("{\\\\`e}" "è")
-    ("{\\\\'e}" "é")
-    ("{\\\\^e}" "ê")
-    ("{\\\\\"\\\\i}" "ï")
-    ("{\\\\`\\\\i}" "ì")
-    ("{\\\\'\\\\i}" "í")
-    ("{\\\\^\\\\i}" "î")
-    ("{\\\\\"i}" "ï")
-    ("{\\\\`i}" "ì")
-    ("{\\\\'i}" "í")
-    ("{\\\\^i}" "î")
-    ("{\\\\\"o}" "ö")
-    ("{\\\\`o}" "ò")
-    ("{\\\\'o}" "ó")
-    ("{\\\\~o}" "õ")
-    ("{\\\\^o}" "ô")
-    ("{\\\\\"u}" "ü")
-    ("{\\\\`u}" "ù")
-    ("{\\\\'u}" "ú")
-    ("{\\\\^u}" "û")
-    ("{\\\\\"A}" "Ä")
-    ("{\\\\`A}" "À")
-    ("{\\\\'A}" "Á")
-    ("{\\\\~A}" "Ã")
-    ("{\\\\^A}" "Â")
-    ("{\\\\\"E}" "Ë")
-    ("{\\\\`E}" "È")
-    ("{\\\\'E}" "É")
-    ("{\\\\^E}" "Ê")
-    ("{\\\\\"I}" "Ï")
-    ("{\\\\`I}" "Ì")
-    ("{\\\\'I}" "Í")
-    ("{\\\\^I}" "Î")
-    ("{\\\\\"O}" "Ö")
-    ("{\\\\`O}" "Ò")
-    ("{\\\\'O}" "Ó")
-    ("{\\\\~O}" "Õ")
-    ("{\\\\^O}" "Ô")
-    ("{\\\\\"U}" "Ü")
-    ("{\\\\`U}" "Ù")
-    ("{\\\\'U}" "Ú")
-    ("{\\\\^U}" "Û")
-    ("{\\\\~n}" "ñ")
-    ("{\\\\~N}" "Ñ")
-    ("{\\\\c c}" "ç")
-    ("{\\\\c C}" "Ç")
-    ("\\\\\"a" "ä")
-    ("\\\\`a" "à")
-    ("\\\\'a" "á")
-    ("\\\\~a" "ã")
-    ("\\\\^a" "â")
-    ("\\\\\"e" "ë")
-    ("\\\\`e" "è")
-    ("\\\\'e" "é")
-    ("\\\\^e" "ê")
-    ("\\\\\"\\\\i" "ï")
-    ("\\\\`\\\\i" "ì")
-    ("\\\\'\\\\i" "í")
-    ("\\\\^\\\\i" "î")
-    ("\\\\\"i" "ï")
-    ("\\\\`i" "ì")
-    ("\\\\'i" "í")
-    ("\\\\^i" "î")
-    ("\\\\\"o" "ö")
-    ("\\\\`o" "ò")
-    ("\\\\'o" "ó")
-    ("\\\\~o" "õ")
-    ("\\\\^o" "ô")
-    ("\\\\\"u" "ü")
-    ("\\\\`u" "ù")
-    ("\\\\'u" "ú")
-    ("\\\\^u" "û")
-    ("\\\\\"A" "Ä")
-    ("\\\\`A" "À")
-    ("\\\\'A" "Á")
-    ("\\\\~A" "Ã")
-    ("\\\\^A" "Â")
-    ("\\\\\"E" "Ë")
-    ("\\\\`E" "È")
-    ("\\\\'E" "É")
-    ("\\\\^E" "Ê")
-    ("\\\\\"I" "Ï")
-    ("\\\\`I" "Ì")
-    ("\\\\'I" "Í")
-    ("\\\\^I" "Î")
-    ("\\\\\"O" "Ö")
-    ("\\\\`O" "Ò")
-    ("\\\\'O" "Ó")
-    ("\\\\~O" "Õ")
-    ("\\\\^O" "Ô")
-    ("\\\\\"U" "Ü")
-    ("\\\\`U" "Ù")
-    ("\\\\'U" "Ú")
-    ("\\\\^U" "Û")
-    ("\\\\~n" "ñ")
-    ("\\\\~N" "Ñ")
-    ("\\\\\"{a}" "ä")
-    ("\\\\`{a}" "à")
-    ("\\\\'{a}" "á")
-    ("\\\\~{a}" "ã")
-    ("\\\\^{a}" "â")
-    ("\\\\\"{e}" "ë")
-    ("\\\\`{e}" "è")
-    ("\\\\'{e}" "é")
-    ("\\\\^{e}" "ê")
-    ("\\\\\"{\\\\i}" "ï")
-    ("\\\\`{\\\\i}" "ì")
-    ("\\\\'{\\\\i}" "í")
-    ("\\\\^{\\\\i}" "î")
-    ("\\\\\"{i}" "ï")
-    ("\\\\`{i}" "ì")
-    ("\\\\'{i}" "í")
-    ("\\\\^{i}" "î")
-    ("\\\\\"{o}" "ö")
-    ("\\\\`{o}" "ò")
-    ("\\\\'{o}" "ó")
-    ("\\\\~{o}" "õ")
-    ("\\\\^{o}" "ô")
-    ("\\\\\"{u}" "ü")
-    ("\\\\`{u}" "ù")
-    ("\\\\'{u}" "ú")
-    ("\\\\^{u}" "û")
-    ("\\\\\"{A}" "Ä")
-    ("\\\\`{A}" "À")
-    ("\\\\'{A}" "Á")
-    ("\\\\~{A}" "Ã")
-    ("\\\\^{A}" "Â")
-    ("\\\\\"{E}" "Ë")
-    ("\\\\`{E}" "È")
-    ("\\\\'{E}" "É")
-    ("\\\\^{E}" "Ê")
-    ("\\\\\"{I}" "Ï")
-    ("\\\\`{I}" "Ì")
-    ("\\\\'{I}" "Í")
-    ("\\\\^{I}" "Î")
-    ("\\\\\"{O}" "Ö")
-    ("\\\\`{O}" "Ò")
-    ("\\\\'{O}" "Ó")
-    ("\\\\~{O}" "Õ")
-    ("\\\\^{O}" "Ô")
-    ("\\\\\"{U}" "Ü")
-    ("\\\\`{U}" "Ù")
-    ("\\\\'{U}" "Ú")
-    ("\\\\^{U}" "Û")
-    ("\\\\~{n}" "ñ")
-    ("\\\\~{N}" "Ñ")
-    ("\\\\c{c}" "ç")
-    ("\\\\c{C}" "Ç")
-    ("{\\\\ss}" "ß")
+    ("{\\\\\"a}" "ä")
+    ("{\\\\`a}" "à")
+    ("{\\\\'a}" "á")
+    ("{\\\\~a}" "ã")
+    ("{\\\\^a}" "â")
+    ("{\\\\\"e}" "ë")
+    ("{\\\\`e}" "è")
+    ("{\\\\'e}" "é")
+    ("{\\\\^e}" "ê")
+    ("{\\\\\"\\\\i}" "ï")
+    ("{\\\\`\\\\i}" "ì")
+    ("{\\\\'\\\\i}" "í")
+    ("{\\\\^\\\\i}" "î")
+    ("{\\\\\"i}" "ï")
+    ("{\\\\`i}" "ì")
+    ("{\\\\'i}" "í")
+    ("{\\\\^i}" "î")
+    ("{\\\\\"o}" "ö")
+    ("{\\\\`o}" "ò")
+    ("{\\\\'o}" "ó")
+    ("{\\\\~o}" "õ")
+    ("{\\\\^o}" "ô")
+    ("{\\\\\"u}" "ü")
+    ("{\\\\`u}" "ù")
+    ("{\\\\'u}" "ú")
+    ("{\\\\^u}" "û")
+    ("{\\\\\"A}" "Ä")
+    ("{\\\\`A}" "À")
+    ("{\\\\'A}" "Á")
+    ("{\\\\~A}" "Ã\83")
+    ("{\\\\^A}" "Â")
+    ("{\\\\\"E}" "Ë")
+    ("{\\\\`E}" "È")
+    ("{\\\\'E}" "É")
+    ("{\\\\^E}" "Ê")
+    ("{\\\\\"I}" "Ï")
+    ("{\\\\`I}" "Ì")
+    ("{\\\\'I}" "Í")
+    ("{\\\\^I}" "Î")
+    ("{\\\\\"O}" "Ö")
+    ("{\\\\`O}" "Ò")
+    ("{\\\\'O}" "Ó")
+    ("{\\\\~O}" "Õ")
+    ("{\\\\^O}" "Ô")
+    ("{\\\\\"U}" "Ü")
+    ("{\\\\`U}" "Ù")
+    ("{\\\\'U}" "Ú")
+    ("{\\\\^U}" "Û")
+    ("{\\\\~n}" "ñ")
+    ("{\\\\~N}" "Ñ")
+    ("{\\\\c c}" "ç")
+    ("{\\\\c C}" "Ç")
+    ("\\\\\"a" "ä")
+    ("\\\\`a" "à")
+    ("\\\\'a" "á")
+    ("\\\\~a" "ã")
+    ("\\\\^a" "â")
+    ("\\\\\"e" "ë")
+    ("\\\\`e" "è")
+    ("\\\\'e" "é")
+    ("\\\\^e" "ê")
+    ("\\\\\"\\\\i" "ï")
+    ("\\\\`\\\\i" "ì")
+    ("\\\\'\\\\i" "í")
+    ("\\\\^\\\\i" "î")
+    ("\\\\\"i" "ï")
+    ("\\\\`i" "ì")
+    ("\\\\'i" "í")
+    ("\\\\^i" "î")
+    ("\\\\\"o" "ö")
+    ("\\\\`o" "ò")
+    ("\\\\'o" "ó")
+    ("\\\\~o" "õ")
+    ("\\\\^o" "ô")
+    ("\\\\\"u" "ü")
+    ("\\\\`u" "ù")
+    ("\\\\'u" "ú")
+    ("\\\\^u" "û")
+    ("\\\\\"A" "Ä")
+    ("\\\\`A" "À")
+    ("\\\\'A" "Á")
+    ("\\\\~A" "Ã\83")
+    ("\\\\^A" "Â")
+    ("\\\\\"E" "Ë")
+    ("\\\\`E" "È")
+    ("\\\\'E" "É")
+    ("\\\\^E" "Ê")
+    ("\\\\\"I" "Ï")
+    ("\\\\`I" "Ì")
+    ("\\\\'I" "Í")
+    ("\\\\^I" "Î")
+    ("\\\\\"O" "Ö")
+    ("\\\\`O" "Ò")
+    ("\\\\'O" "Ó")
+    ("\\\\~O" "Õ")
+    ("\\\\^O" "Ô")
+    ("\\\\\"U" "Ü")
+    ("\\\\`U" "Ù")
+    ("\\\\'U" "Ú")
+    ("\\\\^U" "Û")
+    ("\\\\~n" "ñ")
+    ("\\\\~N" "Ñ")
+    ("\\\\\"{a}" "ä")
+    ("\\\\`{a}" "à")
+    ("\\\\'{a}" "á")
+    ("\\\\~{a}" "ã")
+    ("\\\\^{a}" "â")
+    ("\\\\\"{e}" "ë")
+    ("\\\\`{e}" "è")
+    ("\\\\'{e}" "é")
+    ("\\\\^{e}" "ê")
+    ("\\\\\"{\\\\i}" "ï")
+    ("\\\\`{\\\\i}" "ì")
+    ("\\\\'{\\\\i}" "í")
+    ("\\\\^{\\\\i}" "î")
+    ("\\\\\"{i}" "ï")
+    ("\\\\`{i}" "ì")
+    ("\\\\'{i}" "í")
+    ("\\\\^{i}" "î")
+    ("\\\\\"{o}" "ö")
+    ("\\\\`{o}" "ò")
+    ("\\\\'{o}" "ó")
+    ("\\\\~{o}" "õ")
+    ("\\\\^{o}" "ô")
+    ("\\\\\"{u}" "ü")
+    ("\\\\`{u}" "ù")
+    ("\\\\'{u}" "ú")
+    ("\\\\^{u}" "û")
+    ("\\\\\"{A}" "Ä")
+    ("\\\\`{A}" "À")
+    ("\\\\'{A}" "Á")
+    ("\\\\~{A}" "Ã\83")
+    ("\\\\^{A}" "Â")
+    ("\\\\\"{E}" "Ë")
+    ("\\\\`{E}" "È")
+    ("\\\\'{E}" "É")
+    ("\\\\^{E}" "Ê")
+    ("\\\\\"{I}" "Ï")
+    ("\\\\`{I}" "Ì")
+    ("\\\\'{I}" "Í")
+    ("\\\\^{I}" "Î")
+    ("\\\\\"{O}" "Ö")
+    ("\\\\`{O}" "Ò")
+    ("\\\\'{O}" "Ó")
+    ("\\\\~{O}" "Õ")
+    ("\\\\^{O}" "Ô")
+    ("\\\\\"{U}" "Ü")
+    ("\\\\`{U}" "Ù")
+    ("\\\\'{U}" "Ú")
+    ("\\\\^{U}" "Û")
+    ("\\\\~{n}" "ñ")
+    ("\\\\~{N}" "Ñ")
+    ("\\\\c{c}" "ç")
+    ("\\\\c{C}" "Ç")
+    ("{\\\\ss}" "ß")
     ("{\\\\AE}" "\306")
     ("{\\\\ae}" "\346")
     ("{\\\\AA}" "\305")
     ("{\\\\aa}" "\345")
     ("{\\\\copyright}" "\251")
     ("\\\\copyright{}" "\251")
-    ("{\\\\pounds}" "£" )
-    ("{\\\\P}" "¶" )
-    ("{\\\\S}" "§" )
-    ("\\\\pounds{}" "£" )
-    ("\\\\P{}" "¶" )
-    ("\\\\S{}" "§" )
-    ("?`" "¿")
-    ("!`" "¡")
-    ("{?`}" "¿")
-    ("{!`}" "¡")
-    ("\"a" "ä")
-    ("\"A" "Ä")
-    ("\"o" "ö")
-    ("\"O" "Ö")
-    ("\"u" "ü")
-    ("\"U" "Ü")
-    ("\"s" "ß")
-    ("\\\\3" "ß")
+    ("{\\\\pounds}" "£" )
+    ("{\\\\P}" "¶" )
+    ("{\\\\S}" "§" )
+    ("\\\\pounds{}" "£" )
+    ("\\\\P{}" "¶" )
+    ("\\\\S{}" "§" )
+    ("?`" "¿")
+    ("!`" "¡")
+    ("{?`}" "¿")
+    ("{!`}" "¡")
+    ("\"a" "ä")
+    ("\"A" "Ä")
+    ("\"o" "ö")
+    ("\"O" "Ö")
+    ("\"u" "ü")
+    ("\"U" "Ü")
+    ("\"s" "ß")
+    ("\\\\3" "ß")
     )
   "Translation table for translating German TeX sequences to ISO 8859-1.
 This table is not exhaustive (and due to TeX's power can never be).
@@ -583,65 +583,65 @@ It only contains commonly used sequences.")
 
 (defvar iso-iso2gtex-trans-tab
   '(
-    ("ä" "\"a")
-    ("à" "{\\\\`a}")
-    ("á" "{\\\\'a}")
-    ("ã" "{\\\\~a}")
-    ("â" "{\\\\^a}")
-    ("ë" "{\\\\\"e}")
-    ("è" "{\\\\`e}")
-    ("é" "{\\\\'e}")
-    ("ê" "{\\\\^e}")
-    ("ï" "{\\\\\"\\\\i}")
-    ("ì" "{\\\\`\\\\i}")
-    ("í" "{\\\\'\\\\i}")
-    ("î" "{\\\\^\\\\i}")
-    ("ö" "\"o")
-    ("ò" "{\\\\`o}")
-    ("ó" "{\\\\'o}")
-    ("õ" "{\\\\~o}")
-    ("ô" "{\\\\^o}")
-    ("ü" "\"u")
-    ("ù" "{\\\\`u}")
-    ("ú" "{\\\\'u}")
-    ("û" "{\\\\^u}")
-    ("Ä" "\"A")
-    ("À" "{\\\\`A}")
-    ("Á" "{\\\\'A}")
-    ("Ã" "{\\\\~A}")
-    ("Â" "{\\\\^A}")
-    ("Ë" "{\\\\\"E}")
-    ("È" "{\\\\`E}")
-    ("É" "{\\\\'E}")
-    ("Ê" "{\\\\^E}")
-    ("Ï" "{\\\\\"I}")
-    ("Ì" "{\\\\`I}")
-    ("Í" "{\\\\'I}")
-    ("Î" "{\\\\^I}")
-    ("Ö" "\"O")
-    ("Ò" "{\\\\`O}")
-    ("Ó" "{\\\\'O}")
-    ("Õ" "{\\\\~O}")
-    ("Ô" "{\\\\^O}")
-    ("Ü" "\"U")
-    ("Ù" "{\\\\`U}")
-    ("Ú" "{\\\\'U}")
-    ("Û" "{\\\\^U}")
-    ("ñ" "{\\\\~n}")
-    ("Ñ" "{\\\\~N}")
-    ("ç" "{\\\\c c}")
-    ("Ç" "{\\\\c C}")
-    ("ß" "\"s")
+    ("ä" "\"a")
+    ("à" "{\\\\`a}")
+    ("á" "{\\\\'a}")
+    ("ã" "{\\\\~a}")
+    ("â" "{\\\\^a}")
+    ("ë" "{\\\\\"e}")
+    ("è" "{\\\\`e}")
+    ("é" "{\\\\'e}")
+    ("ê" "{\\\\^e}")
+    ("ï" "{\\\\\"\\\\i}")
+    ("ì" "{\\\\`\\\\i}")
+    ("í" "{\\\\'\\\\i}")
+    ("î" "{\\\\^\\\\i}")
+    ("ö" "\"o")
+    ("ò" "{\\\\`o}")
+    ("ó" "{\\\\'o}")
+    ("õ" "{\\\\~o}")
+    ("ô" "{\\\\^o}")
+    ("ü" "\"u")
+    ("ù" "{\\\\`u}")
+    ("ú" "{\\\\'u}")
+    ("û" "{\\\\^u}")
+    ("Ä" "\"A")
+    ("À" "{\\\\`A}")
+    ("Á" "{\\\\'A}")
+    ("Ã\83" "{\\\\~A}")
+    ("Â" "{\\\\^A}")
+    ("Ë" "{\\\\\"E}")
+    ("È" "{\\\\`E}")
+    ("É" "{\\\\'E}")
+    ("Ê" "{\\\\^E}")
+    ("Ï" "{\\\\\"I}")
+    ("Ì" "{\\\\`I}")
+    ("Í" "{\\\\'I}")
+    ("Î" "{\\\\^I}")
+    ("Ö" "\"O")
+    ("Ò" "{\\\\`O}")
+    ("Ó" "{\\\\'O}")
+    ("Õ" "{\\\\~O}")
+    ("Ô" "{\\\\^O}")
+    ("Ü" "\"U")
+    ("Ù" "{\\\\`U}")
+    ("Ú" "{\\\\'U}")
+    ("Û" "{\\\\^U}")
+    ("ñ" "{\\\\~n}")
+    ("Ñ" "{\\\\~N}")
+    ("ç" "{\\\\c c}")
+    ("Ç" "{\\\\c C}")
+    ("ß" "\"s")
     ("\306" "{\\\\AE}")
     ("\346" "{\\\\ae}")
     ("\305" "{\\\\AA}")
     ("\345" "{\\\\aa}")
     ("\251" "{\\\\copyright}")
-    ("£" "{\\\\pounds}")
-    ("¶" "{\\\\P}")
-    ("§" "{\\\\S}")
-    ("¿" "{?`}")
-    ("¡" "{!`}")
+    ("£" "{\\\\pounds}")
+    ("¶" "{\\\\P}")
+    ("§" "{\\\\S}")
+    ("¿" "{?`}")
+    ("¡" "{!`}")
     )
   "Translation table for translating ISO 8859-1 characters to German TeX.")
 
@@ -664,13 +664,13 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
  (iso-translate-conventions from to iso-iso2gtex-trans-tab))
 
 (defvar iso-iso2duden-trans-tab
-  '(("ä" "ae")
-    ("Ä" "Ae")
-    ("ö" "oe")
-    ("Ö" "Oe")
-    ("ü" "ue")
-    ("Ü" "Ue")
-    ("ß" "ss"))
+  '(("ä" "ae")
+    ("Ä" "Ae")
+    ("ö" "oe")
+    ("Ö" "Oe")
+    ("ü" "ue")
+    ("Ü" "Ue")
+    ("ß" "ss"))
     "Translation table for translating ISO 8859-1 characters to Duden sequences.")
 
 ;;;###autoload
@@ -683,133 +683,133 @@ Optional arg BUFFER is ignored (for use in `format-alist')."
  (iso-translate-conventions from to iso-iso2duden-trans-tab))
 
 (defvar iso-iso2sgml-trans-tab
-  '(("À" "À")
-    ("Á" "Á")
-    ("Â" "Â")
-    ("Ã" "Ã")
-    ("Ä" "Ä")
-    ("Å" "Å")
-    ("Æ" "Æ")
-    ("Ç" "Ç")
-    ("È" "È")
-    ("É" "É")
-    ("Ê" "Ê")
-    ("Ë" "Ë")
-    ("Ì" "Ì")
-    ("Í" "Í")
-    ("Î" "Î")
-    ("Ï" "Ï")
-    ("Ð" "Ð")
-    ("Ñ" "Ñ")
-    ("Ò" "Ò")
-    ("Ó" "Ó")
-    ("Ô" "Ô")
-    ("Õ" "Õ")
-    ("Ö" "Ö")
-    ("Ø" "Ø")
-    ("Ù" "Ù")
-    ("Ú" "Ú")
-    ("Û" "Û")
-    ("Ü" "Ü")
-    ("Ý" "Ý")
-    ("Þ" "Þ")
-    ("ß" "ß")
-    ("à" "à")
-    ("á" "á")
-    ("â" "â")
-    ("ã" "ã")
-    ("ä" "ä")
-    ("å" "å")
-    ("æ" "æ")
-    ("ç" "ç")
-    ("è" "è")
-    ("é" "é")
-    ("ê" "ê")
-    ("ë" "ë")
-    ("ì" "ì")
-    ("í" "í")
-    ("î" "î")
-    ("ï" "ï")
-    ("ð" "ð")
-    ("ñ" "ñ")
-    ("ò" "ò")
-    ("ó" "ó")
-    ("ô" "ô")
-    ("õ" "õ")
-    ("ö" "ö")
-    ("ø" "ø")
-    ("ù" "ù")
-    ("ú" "ú")
-    ("û" "û")
-    ("ü" "ü")
-    ("ý" "ý")
-    ("þ" "þ")
-    ("ÿ" "ÿ")))
+  '(("À" "À")
+    ("Á" "Á")
+    ("Â" "Â")
+    ("Ã\83" "Ã")
+    ("Ä" "Ä")
+    ("Å" "Å")
+    ("Æ" "Æ")
+    ("Ç" "Ç")
+    ("È" "È")
+    ("É" "É")
+    ("Ê" "Ê")
+    ("Ë" "Ë")
+    ("Ì" "Ì")
+    ("Í" "Í")
+    ("Î" "Î")
+    ("Ï" "Ï")
+    ("Ð" "Ð")
+    ("Ñ" "Ñ")
+    ("Ò" "Ò")
+    ("Ó" "Ó")
+    ("Ô" "Ô")
+    ("Õ" "Õ")
+    ("Ö" "Ö")
+    ("Ø" "Ø")
+    ("Ù" "Ù")
+    ("Ú" "Ú")
+    ("Û" "Û")
+    ("Ü" "Ü")
+    ("Ý" "Ý")
+    ("Þ" "Þ")
+    ("ß" "ß")
+    ("à" "à")
+    ("á" "á")
+    ("â" "â")
+    ("ã" "ã")
+    ("ä" "ä")
+    ("å" "å")
+    ("æ" "æ")
+    ("ç" "ç")
+    ("è" "è")
+    ("é" "é")
+    ("ê" "ê")
+    ("ë" "ë")
+    ("ì" "ì")
+    ("í" "í")
+    ("î" "î")
+    ("ï" "ï")
+    ("ð" "ð")
+    ("ñ" "ñ")
+    ("ò" "ò")
+    ("ó" "ó")
+    ("ô" "ô")
+    ("õ" "õ")
+    ("ö" "ö")
+    ("ø" "ø")
+    ("ù" "ù")
+    ("ú" "ú")
+    ("û" "û")
+    ("ü" "ü")
+    ("ý" "ý")
+    ("þ" "þ")
+    ("ÿ" "ÿ")))
 
 (defvar iso-sgml2iso-trans-tab
-  '(("À" "À")
-    ("Á" "Á")
-    ("Â" "Â")
-    ("Ã" "Ã")
-    ("Ä" "Ä")
-    ("Å" "Å")
-    ("Æ" "Æ")
-    ("Ç" "Ç")
-    ("È" "È")
-    ("É" "É")
-    ("Ê" "Ê")
-    ("Ë" "Ë")
-    ("Ì" "Ì")
-    ("Í" "Í")
-    ("Î" "Î")
-    ("Ï" "Ï")
-    ("Ð" "Ð")
-    ("Ñ" "Ñ")
-    ("Ò" "Ò")
-    ("Ó" "Ó")
-    ("Ô" "Ô")
-    ("Õ" "Õ")
-    ("Ö" "Ö")
-    ("Ø" "Ø")
-    ("Ù" "Ù")
-    ("Ú" "Ú")
-    ("Û" "Û")
-    ("Ü" "Ü")
-    ("Ý" "Ý")
-    ("Þ" "Þ")
-    ("ß" "ß")
-    ("à" "à")
-    ("á" "á")
-    ("â" "â")
-    ("ã" "ã")
-    ("ä" "ä")
-    ("å" "å")
-    ("æ" "æ")
-    ("ç" "ç")
-    ("è" "è")
-    ("é" "é")
-    ("ê" "ê")
-    ("ë" "ë")
-    ("ì" "ì")
-    ("í" "í")
-    ("î" "î")
-    ("ï" "ï")
-    ("ð" "ð")
-    ("ñ" "ñ")
-    (" " " ")
-    ("ò" "ò")
-    ("ó" "ó")
-    ("ô" "ô")
-    ("õ" "õ")
-    ("ö" "ö")
-    ("ø" "ø")
-    ("ù" "ù")
-    ("ú" "ú")
-    ("û" "û")
-    ("ü" "ü")
-    ("ý" "ý")
-    ("þ" "þ")
-    ("ÿ" "ÿ")))
+  '(("À" "À")
+    ("Á" "Á")
+    ("Â" "Â")
+    ("Ã" "Ã\83")
+    ("Ä" "Ä")
+    ("Å" "Å")
+    ("Æ" "Æ")
+    ("Ç" "Ç")
+    ("È" "È")
+    ("É" "É")
+    ("Ê" "Ê")
+    ("Ë" "Ë")
+    ("Ì" "Ì")
+    ("Í" "Í")
+    ("Î" "Î")
+    ("Ï" "Ï")
+    ("Ð" "Ð")
+    ("Ñ" "Ñ")
+    ("Ò" "Ò")
+    ("Ó" "Ó")
+    ("Ô" "Ô")
+    ("Õ" "Õ")
+    ("Ö" "Ö")
+    ("Ø" "Ø")
+    ("Ù" "Ù")
+    ("Ú" "Ú")
+    ("Û" "Û")
+    ("Ü" "Ü")
+    ("Ý" "Ý")
+    ("Þ" "Þ")
+    ("ß" "ß")
+    ("à" "à")
+    ("á" "á")
+    ("â" "â")
+    ("ã" "ã")
+    ("ä" "ä")
+    ("å" "å")
+    ("æ" "æ")
+    ("ç" "ç")
+    ("è" "è")
+    ("é" "é")
+    ("ê" "ê")
+    ("ë" "ë")
+    ("ì" "ì")
+    ("í" "í")
+    ("î" "î")
+    ("ï" "ï")
+    ("ð" "ð")
+    ("ñ" "ñ")
+    (" " " ")
+    ("ò" "ò")
+    ("ó" "ó")
+    ("ô" "ô")
+    ("õ" "õ")
+    ("ö" "ö")
+    ("ø" "ø")
+    ("ù" "ù")
+    ("ú" "ú")
+    ("û" "û")
+    ("ü" "ü")
+    ("ý" "ý")
+    ("þ" "þ")
+    ("ÿ" "ÿ")))
 
 ;;;###autoload
 (defun iso-iso2sgml (from to &optional buffer)