Mercurial > emacs
comparison lisp/international/utf-8.el @ 50549:c8525ac04d76
(utf-translate-cjk-mode): Fix incorrect
place of parenthesis.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 11 Apr 2003 11:10:48 +0000 |
parents | f49a20cb84ed |
children | fc9cb527333d |
comparison
equal
deleted
inserted
replaced
50548:706cf77805ad | 50549:c8525ac04d76 |
---|---|
251 (aset table k t)) | 251 (aset table k t)) |
252 ucs-mule-cjk-to-unicode) | 252 ucs-mule-cjk-to-unicode) |
253 (define-translation-hash-table 'utf-subst-table-for-decode | 253 (define-translation-hash-table 'utf-subst-table-for-decode |
254 ucs-unicode-to-mule-cjk) | 254 ucs-unicode-to-mule-cjk) |
255 (define-translation-hash-table 'utf-subst-table-for-encode | 255 (define-translation-hash-table 'utf-subst-table-for-encode |
256 ucs-mule-cjk-to-unicode)) | 256 ucs-mule-cjk-to-unicode))) |
257 (define-translation-hash-table 'utf-subst-table-for-decode | 257 (define-translation-hash-table 'utf-subst-table-for-decode |
258 (make-hash-table :test 'eq)) | 258 (make-hash-table :test 'eq)) |
259 (define-translation-hash-table 'utf-subst-table-for-encode | 259 (define-translation-hash-table 'utf-subst-table-for-encode |
260 (make-hash-table :test 'eq))))) | 260 (make-hash-table :test 'eq)))) |
261 | 261 |
262 (define-ccl-program ccl-decode-mule-utf-8 | 262 (define-ccl-program ccl-decode-mule-utf-8 |
263 ;; | 263 ;; |
264 ;; charset | bytes in utf-8 | bytes in emacs | 264 ;; charset | bytes in utf-8 | bytes in emacs |
265 ;; -----------------------+----------------+--------------- | 265 ;; -----------------------+----------------+--------------- |