summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/language/thai-word.el2
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a0a670300dc..de590d8833c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2005-03-31 Kenichi Handa <handa@etlken2>
+ * language/thai-word.el (thai-find-word-ends): Pay attention to
+ the case that we reach the end of buffer.
+
* textmodes/fill.el (fill-text-properties-at): New function.
(fill-newline): Use fill-text-properties-at instead of
text-properties-at.
diff --git a/lisp/language/thai-word.el b/lisp/language/thai-word.el
index 9c3ba81859e..2548a44ea80 100644
--- a/lisp/language/thai-word.el
+++ b/lisp/language/thai-word.el
@@ -10780,7 +10780,7 @@ the current word list."
;; 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