diff options
Diffstat (limited to 'lisp/language/japan-util.el')
| -rw-r--r-- | lisp/language/japan-util.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el index a97656e25d7..96fd8957d20 100644 --- a/lisp/language/japan-util.el +++ b/lisp/language/japan-util.el @@ -162,8 +162,7 @@ belongs to `japanese-jisx0208', ASCII belongs to `ascii'.") ;; Convert string STR by FUNC and return a resulting string. (defun japanese-string-conversion (str func &rest args) (let ((buf (get-buffer-create " *Japanese work*"))) - (save-excursion - (set-buffer buf) + (with-current-buffer buf (erase-buffer) (insert str) (apply func 1 (point) args) |