# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 909388811 0
# Node ID 87736ae8e5ff005c944a0e6f469b325d377a51c7
# Parent  77c9675127145e9be43ef96ba4583960a07ba424
(in-is13194-devanagari-pre-write-conversion): Cancel previous
change, use generate-new-buffer instead of get-buffer-create.

diff -r 77c967512714 -r 87736ae8e5ff lisp/language/devan-util.el
--- a/lisp/language/devan-util.el	Mon Oct 26 08:00:11 1998 +0000
+++ b/lisp/language/devan-util.el	Mon Oct 26 08:00:11 1998 +0000
@@ -1278,11 +1278,11 @@
 ;;;###autoload
 (defun in-is13194-devanagari-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))
-      (devanagari-decompose-to-is13194-region (point-min) (point-max)))
+    (set-buffer (generate-new-buffer " *temp*"))
+    (if (stringp from)
+	(insert from)
+      (insert-buffer-substring old-buf from to))
+    (devanagari-decompose-to-is13194-region (point-min) (point-max))
     ;; Should return nil as annotations.
     nil))