# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 968325786 0
# Node ID 1cc26c3824f91a55c20a4e8d03438a569e6b38b6
# Parent  3636690244175f378074bc168c29ab8f25c1e472
(devanagari-to-indian-region): In the loop, change the following char,
not preceding char.

diff -r 363669024417 -r 1cc26c3824f9 lisp/language/devan-util.el
--- a/lisp/language/devan-util.el	Thu Sep 07 11:22:41 2000 +0000
+++ b/lisp/language/devan-util.el	Thu Sep 07 11:23:06 2000 +0000
@@ -89,7 +89,7 @@
       (let ((char (following-char)))
 	(if (eq (char-charset char) 'indian-2-column)
 	    (progn
-	      (delete-char -1)
+	      (delete-char 1)
 	      (insert (devanagari-to-indian char)))
 	  (forward-char 1))))))