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
1 changed files with 1 additions and 1 deletions
|
@ -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."
|
or session. Otherwise, the addition is permanent."
|
||||||
(interactive
|
(interactive
|
||||||
(list (progn (require 'flyspell)
|
(list (progn (require 'flyspell)
|
||||||
(flyspell-get-word))
|
(car (flyspell-get-word)))
|
||||||
(cond ((equal current-prefix-arg '(16))
|
(cond ((equal current-prefix-arg '(16))
|
||||||
'session)
|
'session)
|
||||||
((equal current-prefix-arg '(4))
|
((equal current-prefix-arg '(4))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue