1 files changed, 1 insertions, 2 deletions

diff --git a/lisp/language/thai-util.el b/lisp/language/thai-util.el
index 5dfb79a394d..f339bfed0e5 100644
--- a/lisp/language/thai-util.el
+++ b/lisp/language/thai-util.el
@@ -156,7 +156,7 @@ positions (integers or markers) specifying the region."
         (narrow-to-region (point) (+ (point) len))
         (thai-compose-region (point-min) (point-max))
         (set-buffer-modified-p buffer-modified-p)
-        (point-max)))))
+        (- (point-max) (point-min))))))
 
 ;;;###autoload
 (defun thai-pre-write-conversion (from to)
@@ -174,4 +174,3 @@ positions (integers or markers) specifying the region."
 ;;; generated-autoload-file: "../loaddefs.el"
 ;;; End:
 ;;; thai-util.el ends here
-