summaryrefslogtreecommitdiff
path: root/lisp/language/chinese.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-10-26 08:00:11 +0000
committerKenichi Handa <handa@m17n.org>1998-10-26 08:00:11 +0000
commitd64a0ef70903234ec196cdc7fbe6fceabcd6a953 (patch)
tree7003d7004cf10f8be6d21efc74f27802665bc92d /lisp/language/chinese.el
parent3de546452ed0a7c2167dfe7fef210880b65a98de (diff)
downloademacs-d64a0ef70903234ec196cdc7fbe6fceabcd6a953.tar.gz
(pre-write-encode-hz): Cancel previous
change, use generate-new-buffer instead of get-buffer-create.
Diffstat (limited to 'lisp/language/chinese.el')
-rw-r--r--lisp/language/chinese.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/language/chinese.el b/lisp/language/chinese.el
index bf50795a691..c51f955840e 100644
--- a/lisp/language/chinese.el
+++ b/lisp/language/chinese.el
@@ -101,12 +101,12 @@
(defun pre-write-encode-hz (from to)
(let ((buf (current-buffer)))
- (with-temp-buffer
- (if (stringp from)
- (insert from)
- (insert-buffer-substring buf from to))
- (let (last-coding-system-used)
- (encode-hz-region 1 (point-max))))
+ (set-buffer (generate-new-buffer " *temp*"))
+ (if (stringp from)
+ (insert from)
+ (insert-buffer-substring buf from to))
+ (let (last-coding-system-used)
+ (encode-hz-region 1 (point-max)))
nil))
(set-language-info-alist