aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorKenichi Handa2002-12-09 05:44:06 +0000
committerKenichi Handa2002-12-09 05:44:06 +0000
commitc3ff164a74916a9a1ac625359d555a74d77f3b35 (patch)
tree9395b61a6fcaf57265f376e53af1eab05cfffdb2 /lisp
parent85cce8434790780ebdd1f28494987a3d95d52555 (diff)
downloademacs-c3ff164a74916a9a1ac625359d555a74d77f3b35.tar.gz
emacs-c3ff164a74916a9a1ac625359d555a74d77f3b35.zip
(titdic-convert): Process the header part in multibyte mode.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/international/titdic-cnv.el9
2 files changed, 11 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 96526c9fc23..95aef8d1ae8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12002-12-09 Kenichi Handa <handa@m17n.org>
2
3 * international/titdic-cnv.el (titdic-convert): Process the
4 header part in multibyte mode.
5
12002-12-08 Dave Love <fx@gnu.org> 62002-12-08 Dave Love <fx@gnu.org>
2 7
3 * international/code-pages.el (mule-diag): Move where it's 8 * international/code-pages.el (mule-diag): Move where it's
diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el
index 386279d4b31..f2410a27e27 100644
--- a/lisp/international/titdic-cnv.el
+++ b/lisp/international/titdic-cnv.el
@@ -173,7 +173,7 @@ and radicals is as below:
173 ("chinese-tonepy" "$A5wF4(B" 173 ("chinese-tonepy" "$A5wF4(B"
174 "Pinyin base input method for Chinese charset GB2312 (`chinese-gb2312'). 174 "Pinyin base input method for Chinese charset GB2312 (`chinese-gb2312').
175 175
176Pinyin is the standared roman transliteration method for Chinese. 176Pinyin is the standard roman transliteration method for Chinese.
177For the details of Pinyin system, see the documentation of the input 177For the details of Pinyin system, see the documentation of the input
178method `chinese-py'. 178method `chinese-py'.
179 179
@@ -499,7 +499,10 @@ the generated Quail package is saved."
499 (if (not (search-forward "\nBEGIN" nil t)) 499 (if (not (search-forward "\nBEGIN" nil t))
500 (error "TIT dictionary can't be decoded correctly")) 500 (error "TIT dictionary can't be decoded correctly"))
501 501
502 ;; Process the header part. 502 ;; Process the header part in multibyte mode.
503 (with-current-buffer standard-output
504 (set-buffer-multibyte t))
505 (set-buffer-multibyte t)
503 (forward-line 1) 506 (forward-line 1)
504 (narrow-to-region (point-min) (point)) 507 (narrow-to-region (point-min) (point))
505 (tit-process-header filename) 508 (tit-process-header filename)
@@ -850,7 +853,7 @@ To get complete usage, invoke \"emacs -batch -f batch-titdic-convert -h\"."
850 853
851Pinyin base input method for Chinese charset GB2312 (`chinese-gb2312'). 854Pinyin base input method for Chinese charset GB2312 (`chinese-gb2312').
852 855
853Pinyin is the standared roman transliteration method for Chinese. 856Pinyin is the standard roman transliteration method for Chinese.
854Pinyin uses a sequence of Latin alphabetic characters for each Chinese 857Pinyin uses a sequence of Latin alphabetic characters for each Chinese
855character. The sequence is made by the combination of the initials 858character. The sequence is made by the combination of the initials
856\(the beginning sounds) and finals (the ending sounds). 859\(the beginning sounds) and finals (the ending sounds).