Fix +spell/add-word
when using flyspell
``+spell/add-word`` expects `flyspell-get-word` to return as a string the current word. Instead, it returns a list of the form `(<word> <start-pos> <end-pos>)`.
This commit is contained in:
parent
1456108d5b
commit
90b330bbc5
|
@ -35,7 +35,7 @@ SCOPE can be `buffer' or `session' to exclude words only from the current buffer
|
|||
or session. Otherwise, the addition is permanent."
|
||||
(interactive
|
||||
(list (progn (require 'flyspell)
|
||||
(flyspell-get-word))
|
||||
(car (flyspell-get-word)))
|
||||
(cond ((equal current-prefix-arg '(16))
|
||||
'session)
|
||||
((equal current-prefix-arg '(4))
|
||||
|
|
Loading…
Reference in New Issue
Block a user