diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-10-21 10:45:26 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-10-21 10:45:26 +0000 |
| commit | 73b4b26409567d3492d3ee85d058eda8a115c8cd (patch) | |
| tree | 164daf49e651fdc250954174259002c75770a397 /lisp/language/tibet-util.el | |
| parent | bcd17685299af0f8086549410e8508345a99f12a (diff) | |
| download | emacs-73b4b26409567d3492d3ee85d058eda8a115c8cd.tar.gz emacs-73b4b26409567d3492d3ee85d058eda8a115c8cd.tar.bz2 emacs-73b4b26409567d3492d3ee85d058eda8a115c8cd.zip | |
(tibetan-post-read-conversion): Return
the length of converted region.
Diffstat (limited to 'lisp/language/tibet-util.el')
| -rw-r--r-- | lisp/language/tibet-util.el | 6 |
1 files 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 |