aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa1998-02-04 11:25:01 +0000
committerKenichi Handa1998-02-04 11:25:01 +0000
commit39e0da627d03096c30d9524bcbc711bf15736419 (patch)
tree15d4d3fa91303c8e130679b8c8f08d77aa50cab4
parent17bf0affd39dcb79e56f1bb7a45ef6e66b060e06 (diff)
downloademacs-39e0da627d03096c30d9524bcbc711bf15736419.tar.gz
emacs-39e0da627d03096c30d9524bcbc711bf15736419.zip
(encode-hz-region): Do not bind
enable-multibyte-characters to nil locally.
-rw-r--r--lisp/language/china-util.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/language/china-util.el b/lisp/language/china-util.el
index e70afa9b908..1933770d685 100644
--- a/lisp/language/china-util.el
+++ b/lisp/language/china-util.el
@@ -159,8 +159,7 @@ Return the length of resulting text."
159 ;; Chinese GB2312 -> "~{...~}" 159 ;; Chinese GB2312 -> "~{...~}"
160 (goto-char (point-min)) 160 (goto-char (point-min))
161 (if (re-search-forward "\\cc" nil t) 161 (if (re-search-forward "\\cc" nil t)
162 (let ((enable-multibyte-characters nil) 162 (let (pos)
163 pos)
164 (goto-char (setq pos (match-beginning 0))) 163 (goto-char (setq pos (match-beginning 0)))
165 (encode-coding-region pos (point-max) 'iso-2022-7bit) 164 (encode-coding-region pos (point-max) 'iso-2022-7bit)
166 (goto-char pos) 165 (goto-char pos)