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

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

1 files changed, 5 insertions, 5 deletions

diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el
index f90dc494df7..4a4022d2b62 100644
--- 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))