changeset 61570:4b5610d9b02e

(cp-make-coding-system): Set `translation-table-for-input' property value to the symbol ucs-mule-to-mule-unicode, not to that value. (pt154): Escape guillemet by `\'.
author Kenichi Handa <handa@m17n.org>
date Sat, 16 Apr 2005 01:31:29 +0000
parents b6b7474dd68b
children d45c12a198ac
files lisp/international/code-pages.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/code-pages.el	Sat Apr 16 00:38:31 2005 +0000
+++ b/lisp/international/code-pages.el	Sat Apr 16 01:31:29 2005 +0000
@@ -189,7 +189,7 @@
 	      ;; For Quail translation.  Fixme: this should really be
 	      ;; a separate table that only translates the coding
 	      ;; system's safe-chars.
-	      (cons 'translation-table-for-input ,ucs-mule-to-mule-unicode)))
+	      (cons 'translation-table-for-input 'ucs-mule-to-mule-unicode)))
        (push (list ',name
 		   nil			; charset list
 		   ',decoder
@@ -4475,7 +4475,7 @@
  pt154
  [?Җ ?Ғ ?Ӯ ?ғ ?„ ?… ?Ҷ ?Ү ?Ҳ ?ү ?Ҡ ?Ӣ ?Ң ?Қ ?Һ ?Ҹ ?җ ?‘ ?’ ?“ ?” ?• ?–
   ?— ?ҳ ?ҷ ?ҡ ?ӣ ?ң ?қ ?һ ?ҹ ?  ?Ў ?ў ?Ј ?Ө ?Ҙ ?Ұ ?§ ?Ё ?© ?Ә ?\« ?¬ ?ӯ
-  ?® ?Ҝ ?° ?ұ ?І ?і ?ҙ ?ө ?¶ ?· ?ё ?№ ?ә ?» ?ј ?Ҫ ?ҫ ?ҝ ?А ?Б ?В ?Г ?Д
+  ?® ?Ҝ ?° ?ұ ?І ?і ?ҙ ?ө ?¶ ?· ?ё ?№ ?ә ?\» ?ј ?Ҫ ?ҫ ?ҝ ?А ?Б ?В ?Г ?Д
   ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц ?Ч ?Ш ?Щ ?Ъ ?Ы
   ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н ?о ?п ?р ?с ?т
   ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я])