Revision: miles@gnu.org--gnu-2005/gnus--devo--0--patch-151
[gnus] / contrib / ucs-tables.el
index 43644bf..aceb8c7 100644 (file)
@@ -18,9 +18,9 @@
 ;; GNU General Public License for more details.
 
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING.  If not, write to
-;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Commentary:
 
@@ -710,28 +710,28 @@ Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
         ;; These are commented out since the current 8859-8 standard
         ;; does not yet define these codepoints, although there are
         ;; drafts which do).
-;       (?\\e,H@\e(B . ?\x05B0) ;; HEBREW POINT SHEVA
-;       (?\\e,HA\e(B . ?\x05B1) ;; HEBREW POINT HATAF SEGOL
-;       (?\\e,HB\e(B . ?\x05B2) ;; HEBREW POINT HATAF PATAH
-;       (?\\e,HC\e(B . ?\x05B3) ;; HEBREW POINT HATAF QAMATS
-;       (?\\e,HD\e(B . ?\x05B4) ;; HEBREW POINT HIRIQ
-;       (?\\e,HE\e(B . ?\x05B5) ;; HEBREW POINT TSERE
-;       (?\\e,HF\e(B . ?\x05B6) ;; HEBREW POINT SEGOL
-;       (?\\e,HG\e(B . ?\x05B7) ;; HEBREW POINT PATAH
-;       (?\\e,HH\e(B . ?\x05B8) ;; HEBREW POINT QAMATS
-;       (?\\e,HI\e(B . ?\x05B9) ;; HEBREW POINT HOLAM
-;       (?\\e,HK\e(B . ?\x05BB) ;; HEBREW POINT QUBUTS
-;       (?\\e,HL\e(B . ?\x05BC) ;; HEBREW POINT DAGESH
-;       (?\\e,HM\e(B . ?\x05BD) ;; HEBREW POINT METEG
-;       (?\\e,HN\e(B . ?\x05BE) ;; HEBREW POINT MAQAF
-;       (?\\e,HO\e(B . ?\x05BF) ;; HEBREW POINT RAFE
-;       (?\\e,HP\e(B . ?\x05C0) ;; HEBREW PUNCTUATION PASEQ
-;       (?\\e,HQ\e(B . ?\x05C1) ;; HEBREW POINT SHIN DOT
-;       (?\\e,HR\e(B . ?\x05C2) ;; HEBREW POINT SIN DOT
-;       (?\\e,HS\e(B . ?\x05C3) ;; HEBREW PUNCTUATION SOF PASUQ
-        (?\\e,H[\e(B . ?\x202D) ;; LEFT-TO-RIGHT OVERRIDE
-        (?\\e,H\\e(B . ?\x202E) ;; RIGHT-TO-LEFT OVERRIDE
-        (?\\e,H]\e(B . ?\x202C) ;; POP DIRECTIONAL FORMATTING
+;       (?\@ . ?\x05B0) ;; HEBREW POINT SHEVA
+;       (?\A . ?\x05B1) ;; HEBREW POINT HATAF SEGOL
+;       (?\B . ?\x05B2) ;; HEBREW POINT HATAF PATAH
+;       (?\C . ?\x05B3) ;; HEBREW POINT HATAF QAMATS
+;       (?\D . ?\x05B4) ;; HEBREW POINT HIRIQ
+;       (?\E . ?\x05B5) ;; HEBREW POINT TSERE
+;       (?\F . ?\x05B6) ;; HEBREW POINT SEGOL
+;       (?\G . ?\x05B7) ;; HEBREW POINT PATAH
+;       (?\H . ?\x05B8) ;; HEBREW POINT QAMATS
+;       (?\I . ?\x05B9) ;; HEBREW POINT HOLAM
+;       (?\K . ?\x05BB) ;; HEBREW POINT QUBUTS
+;       (?\L . ?\x05BC) ;; HEBREW POINT DAGESH
+;       (?\M . ?\x05BD) ;; HEBREW POINT METEG
+;       (?\N . ?\x05BE) ;; HEBREW POINT MAQAF
+;       (?\O . ?\x05BF) ;; HEBREW POINT RAFE
+;       (?\P . ?\x05C0) ;; HEBREW PUNCTUATION PASEQ
+;       (?\Q . ?\x05C1) ;; HEBREW POINT SHIN DOT
+;       (?\R . ?\x05C2) ;; HEBREW POINT SIN DOT
+;       (?\S . ?\x05C3) ;; HEBREW PUNCTUATION SOF PASUQ
+        (?\[ . ?\x202D) ;; LEFT-TO-RIGHT OVERRIDE
+        (?\\ . ?\x202E) ;; RIGHT-TO-LEFT OVERRIDE
+        (?\] . ?\x202C) ;; POP DIRECTIONAL FORMATTING
         (?\\e,H_\e(B . ?\x2017) ;; DOUBLE LOW LINE
         (?\\e,H`\e(B . ?\x05D0) ;; HEBREW LETTER ALEF
         (?\\e,Ha\e(B . ?\x05D1) ;; HEBREW LETTER BET
@@ -760,8 +760,8 @@ Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
         (?\\e,Hx\e(B . ?\x05E8) ;; HEBREW LETTER RESH
         (?\\e,Hy\e(B . ?\x05E9) ;; HEBREW LETTER SHIN
         (?\\e,Hz\e(B . ?\x05EA) ;; HEBREW LETTER TAV
-        (?\\e,H{\e(B . ?\x202A) ;; LEFT-TO-RIGHT EMBEDDING
-        (?\\e,H|\e(B . ?\x202B) ;; RIGHT-TO-LEFT EMBEDDING
+        (?\{ . ?\x202A) ;; LEFT-TO-RIGHT EMBEDDING
+        (?\| . ?\x202B) ;; RIGHT-TO-LEFT EMBEDDING
         (?\\e,H}\e(B . ?\x200E) ;; LEFT-TO-RIGHT MARK
         (?\\e,H~\e(B . ?\x200F) ;; RIGHT-TO-LEFT MARK
         ))
@@ -1749,12 +1749,12 @@ Interactively, prompts for a hex string giving the code."
         (?\e$(7#`\e(B . ?\e$,1GO\e(B)))
 
       (ipa
-       '((?\e,0 \e(B . ?i)
+       '((?i . ?i)
         (?\e,0!\e(B . ?\e$,1#j\e(B)
-        (?\e,0"\e(B . ?e)
+        (?e . ?e)
         (?\e,0#\e(B . ?\e$,1#[\e(B)
         (?\e,0$\e(B . ?\e,Af\e(B)
-        (?\e,0%\e(B . ?a)
+        (?a . ?a)
         (?\e,0&\e(B . ?\e$,1#h\e(B)
         (?\e,0'\e(B . ?\e$,1#Y\e(B)
         (?\e,0(\e(B . ?\e$,1#P\e(B)
@@ -1762,50 +1762,50 @@ Interactively, prompts for a hex string giving the code."
         (?\e,0*\e(B . ?\e$,1#d\e(B)
         (?\e,0+\e(B . ?\e$,1$,\e(B)
         (?\e,0,\e(B . ?\e$,1#Q\e(B)
-        (?\e,0-\e(B . ?y)
+        (?y . ?y)
         (?\e,0.\e(B . ?\e$,1$/\e(B)
         (?\e,0/\e(B . ?\e,Ax\e(B)
         (?\e,00\e(B . ?\e$,1 s\e(B)
         (?\e,01\e(B . ?\e$,1#v\e(B)
         (?\e,02\e(B . ?\e$,1$)\e(B)
         (?\e,03\e(B . ?\e$,1#u\e(B)
-        (?\e,04\e(B . ?u)
+        (?u . ?u)
         (?\e,05\e(B . ?\e$,1$*\e(B)
-        (?\e,06\e(B . ?o)
+        (?o . ?o)
         (?\e,07\e(B . ?\e$,1#T\e(B)
         (?\e,08\e(B . ?\e$,1#R\e(B)
         (?\e,0:\e(B . ?\e$,1#Z\e(B)
-        (?\e,0@\e(B . ?p)
-        (?\e,0A\e(B . ?b)
-        (?\e,0B\e(B . ?t)
-        (?\e,0C\e(B . ?d)
-        (?\e,0D\e(B . ?k)
-        (?\e,0E\e(B . ?g)
-        (?\e,0F\e(B . ?f)
-        (?\e,0G\e(B . ?v)
+        (?p . ?p)
+        (?b . ?b)
+        (?t . ?t)
+        (?d . ?d)
+        (?k . ?k)
+        (?g . ?g)
+        (?f . ?f)
+        (?v . ?v)
         (?\e,0H\e(B . ?\e$,1'8\e(B)
         (?\e,0I\e(B . ?\e,Ap\e(B)
-        (?\e,0J\e(B . ?s)
-        (?\e,0K\e(B . ?z)
+        (?s . ?s)
+        (?z . ?z)
         (?\e,0L\e(B . ?\e$,1$#\e(B)
         (?\e,0M\e(B . ?\e$,1$2\e(B)
         (?\e,0N\e(B . ?\e,Ag\e(B)
-        (?\e,0O\e(B . ?x)
+        (?x . ?x)
         (?\e,0P\e(B . ?\e$,1$!\e(B)
-        (?\e,0Q\e(B . ?h)
-        (?\e,0R\e(B . ?m)
-        (?\e,0S\e(B . ?n)
+        (?h . ?h)
+        (?m . ?m)
+        (?n . ?n)
         (?\e,0T\e(B . ?\e$,1#r\e(B)
         (?\e,0U\e(B . ?\e$,1 k\e(B)
-        (?\e,0V\e(B . ?r)
+        (?r . ?r)
         (?\e,0W\e(B . ?\e$,1$ \e(B)
         (?\e,0X\e(B . ?\e$,1#y\e(B)
-        (?\e,0Y\e(B . ?j)
-        (?\e,0Z\e(B . ?l)
+        (?j . ?j)
+        (?l . ?l)
         (?\e,0[\e(B . ?\e$,1$.\e(B)
         (?\e,0\\e(B . ?\e$,1$?\e(B)
         (?\e,0]\e(B . ?\e$,1#e\e(B)
-        (?\e,0^\e(B . ?w)
+        (?w . ?w)
         (?\e,0_\e(B . ?\e$,1$-\e(B)
         (?\e,0p\e(B . ?\e$,1$h\e(B)
         (?\e,0q\e(B . ?\e$,1$l\e(B)