diff options
author | Stefan Kangas <stefankangas@gmail.com> | 2020-09-02 17:31:08 +0200 |
---|---|---|
committer | Stefan Kangas <stefankangas@gmail.com> | 2020-09-02 17:31:08 +0200 |
commit | dd2c37d0e1d5dcbcd2658b8a5b9959996a133373 (patch) | |
tree | 9feb659e6d8d63de4c8ec1b11f715a9d816515ce /lisp/textmodes/flyspell.el | |
parent | 615c15fd859b94e9d28d2424674b7e43aa3149a5 (diff) | |
download | emacs-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.el | 2 |
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) |