summaryrefslogtreecommitdiff
path: root/lisp/language/thai-word.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2005-03-31 07:38:37 +0000
committerKenichi Handa <handa@m17n.org>2005-03-31 07:38:37 +0000
commite5729c6cf66d54c620caed4949b6075d254d6b9d (patch)
treebcbbc308ad0d87fa4e5c0034ebc1e1be5debe410 /lisp/language/thai-word.el
parent7c315e1cff9019c8af55921fab6f571e68b09623 (diff)
downloademacs-e5729c6cf66d54c620caed4949b6075d254d6b9d.tar.gz
(thai-find-word-ends): Pay attention to
the case that we reach the end of buffer.
Diffstat (limited to 'lisp/language/thai-word.el')
-rw-r--r--lisp/language/thai-word.el2
1 files changed, 1 insertions, 1 deletions
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