(ucs-8859-7-alist): Update the table.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 565975fa008fcd2b06db4361acebfb010097c2a9..56c5a9cc35c9aa34555c3dce4e71d9ea72a8681c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-24  Kenichi Handa  <handa@m17n.org>
+
+       * international/ucs-tables.el (ucs-8859-7-alist): Update the table.
+
 2007-11-22  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
 
        * term/x-win.el (x-gtk-map-stock): Check if FILE is a string.

diff --git a/lisp/international/ucs-tables.el b/lisp/international/ucs-tables.el
index 18ab5688d1fd18286eb8820274d41d1de81cc3ea..772a0f05e54bdf876b2879f6f8372ce435224938 100644 (file)
--- a/lisp/international/ucs-tables.el
+++ b/lisp/international/ucs-tables.el
@@ -611,10 +611,13 @@ Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
         (?\\e,F!\e(B . ?\x2018) ;; LEFT SINGLE QUOTATION MARK
         (?\\e,F"\e(B . ?\x2019) ;; RIGHT SINGLE QUOTATION MARK
         (?\\e,F#\e(B . ?\x00A3) ;; POUND SIGN
+        (?\\e,F$\e(B . ?\x20AC) ;; EURO SIGN
+        (?\\e,F%\e(B . ?\x20AF) ;; DRACHMA SIGN
         (?\\e,F&\e(B . ?\x00A6) ;; BROKEN BAR
         (?\\e,F'\e(B . ?\x00A7) ;; SECTION SIGN
         (?\\e,F(\e(B . ?\x00A8) ;; DIAERESIS
         (?\\e,F)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
+        (?\\e,F*\e(B . ?\x037A) ;; GREEK YPOGEGRAMMENI
         (?\\e,F+\e(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
         (?\\e,F,\e(B . ?\x00AC) ;; NOT SIGN
         (?\\e,F-\e(B . ?\x00AD) ;; SOFT HYPHEN