summaryrefslogtreecommitdiff
path: root/lisp/textmodes/flyspell.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2020-09-02 17:31:08 +0200
committerStefan Kangas <stefankangas@gmail.com>2020-09-02 17:31:08 +0200
commitdd2c37d0e1d5dcbcd2658b8a5b9959996a133373 (patch)
tree9feb659e6d8d63de4c8ec1b11f715a9d816515ce /lisp/textmodes/flyspell.el
parent615c15fd859b94e9d28d2424674b7e43aa3149a5 (diff)
downloademacs-dd2c37d0e1d5dcbcd2658b8a5b9959996a133373.tar.gz
emacs-dd2c37d0e1d5dcbcd2658b8a5b9959996a133373.tar.bz2
emacs-dd2c37d0e1d5dcbcd2658b8a5b9959996a133373.zip
Fix OBOE in flyspell-check-previous-highlighted-word
* lisp/textmodes/flyspell.el (flyspell-check-previous-highlighted-word): Fix off-by-one error when word is at (point-min). (Bug#39898) Suggested by OGAWA Hirofumi <hirofumi@mail.parknet.co.jp>.
Diffstat (limited to 'lisp/textmodes/flyspell.el')
-rw-r--r--lisp/textmodes/flyspell.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 98059287210..6889d7eadac 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1904,7 +1904,7 @@ before point that's highlighted as misspelled."
(while (and (setq pos (previous-overlay-change pos))
(not (= pos pos1)))
(setq pos1 pos)
- (if (> pos (point-min))
+ (if (>= pos (point-min))
(progn
(setq ovs (overlays-at pos))
(while (consp ovs)