(viqr-pre-write-conversion): Cancel previous

change, use generate-new-buffer instead of get-buffer-create.

diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el
index f90dc494df71880504eef2f4d6534a1dc25055af..4a4022d2b627a9f4241c401cbdf10a20d5214b09 100644 (file)
--- a/lisp/language/viet-util.el
+++ b/lisp/language/viet-util.el
@@ -284,11 +284,11 @@ positions (integers or markers) specifying the stretch of the region."
 ;;;###autoload
 (defun viqr-pre-write-conversion (from to)
   (let ((old-buf (current-buffer)))
-    (with-temp-buffer
-      (if (stringp from)
-         (insert from)
-       (insert-buffer-substring old-buf from to))
-      (viet-encode-viqr-region (point-min) (point-max)))
+    (set-buffer (generate-new-buffer " *temp*"))
+    (if (stringp from)
+       (insert from)
+      (insert-buffer-substring old-buf from to))
+    (viet-encode-viqr-region (point-min) (point-max))
     ;; Should return nil as annotations.
     nil))