From 73b4b26409567d3492d3ee85d058eda8a115c8cd Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 21 Oct 1997 10:45:26 +0000 Subject: [PATCH] (tibetan-post-read-conversion): Return the length of converted region. --- lisp/language/tibet-util.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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 -- 2.39.2