# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 877430726 0
# Node ID 4595a463b105a20e96e4fdb86f3c7e9c7a75fbbd
# Parent  6d478bc45affacd25bdb7eb2deddacf7a7dbb043
(tibetan-post-read-conversion): Return
the length of converted region.

diff -r 6d478bc45aff -r 4595a463b105 lisp/language/tibet-util.el
--- a/lisp/language/tibet-util.el	Tue Oct 21 10:43:40 1997 +0000
+++ b/lisp/language/tibet-util.el	Tue Oct 21 10:45:26 1997 +0000
@@ -443,9 +443,9 @@
 	(narrow-to-region (point) (+ (point) len))
 	(tibetan-compose-region (point-min) (point-max))
 	(set-buffer-modified-p buffer-modified-p)
-	(point-max))))
-  (make-local-variable 'tibetan-decomposed)
-  (setq tibetan-decomposed nil))
+	(make-local-variable 'tibetan-decomposed)
+	(setq tibetan-decomposed nil)
+	(- (point-max) (point-min))))))
 
 
 ;;;###autoload