changeset 61157:6dffc0a6ed26

(thai-find-word-ends): Pay attention to the case that we reach the end of buffer.
author Kenichi Handa <handa@m17n.org>
date Thu, 31 Mar 2005 07:38:18 +0000
parents b18a0b88ee06
children 6d20273b0b9b 4da4a09e8b1b
files lisp/language/thai-word.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/thai-word.el	Thu Mar 31 04:45:27 2005 +0000
+++ b/lisp/language/thai-word.el	Thu Mar 31 07:38:18 2005 +0000
@@ -10780,7 +10780,7 @@
       ;; character by character.
       (while this
 	(setq pos (1+ pos)
-	      char (char-after pos)
+	      char (or (char-after pos) 0)
 	      category-set (char-category-set char))
 	;; If the current sequence is recorded in `thai-word-table'
 	;; (i.e. (car THIS) is 1) and the following Thai character is