changeset 20107:4595a463b105

(tibetan-post-read-conversion): Return the length of converted region.
author Kenichi Handa <handa@m17n.org>
date Tue, 21 Oct 1997 10:45:26 +0000
parents 6d478bc45aff
children 00b744016673
files lisp/language/tibet-util.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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