Merge pull request #4381 from iwahbe/spell-no-word-error
Add word existence checking for +spell/correct
This commit is contained in:
commit
c45346404a
1 changed files with 2 additions and 1 deletions
|
@ -65,7 +65,8 @@
|
||||||
(featurep! :completion helm)))
|
(featurep! :completion helm)))
|
||||||
(call-interactively #'ispell-word)
|
(call-interactively #'ispell-word)
|
||||||
(cl-destructuring-bind (start . end)
|
(cl-destructuring-bind (start . end)
|
||||||
(bounds-of-thing-at-point 'word)
|
(or (bounds-of-thing-at-point 'word)
|
||||||
|
(user-error "No word at point"))
|
||||||
(let ((word (thing-at-point 'word t))
|
(let ((word (thing-at-point 'word t))
|
||||||
(orig-pt (point))
|
(orig-pt (point))
|
||||||
poss ispell-filter)
|
poss ispell-filter)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue