From: Kenichi Handa <handa@m17n.org>
Date: Tue, 21 Oct 1997 10:45:26 +0000 (+0000)
Subject: (tibetan-post-read-conversion): Return
X-Git-Tag: emacs-20.3~2966
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=73b4b26409567d3492d3ee85d058eda8a115c8cd;p=emacs.git

(tibetan-post-read-conversion): Return
the length of converted region.
---

diff --git a/lisp/language/tibet-util.el b/lisp/language/tibet-util.el
index e8581de2f79..4ce4f36bc90 100644
--- a/lisp/language/tibet-util.el
+++ b/lisp/language/tibet-util.el
@@ -443,9 +443,9 @@ See also docstring of the function tibetan-compose-region."
 	(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