ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-15 14:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

avy.el (avy-action-ispell): Adjust for avy-goto-line

Browse Source 
Fixes #191
This commit is contained in:
Oleh Krehel 2017-12-10 20:04:37 +01:00
parent 78392e670e
commit 7f83bbc645
1 changed files with 14 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
avy.el
View File

@ -696,10 +696,16 @@ Set `avy-style' according to COMMMAND as well."
"Auto correct word at PT." "Auto correct word at PT."
(save-excursion (save-excursion
(goto-char pt) (goto-char pt)
(if (bound-and-true-p flyspell-mode) (cond
(flyspell-correct-word-before-point) ((eq avy-command 'avy-goto-line)
(if (looking-at-p "\\b") (ispell-region
(ispell-word) (line-beginning-position)
(line-end-position)))
((bound-and-true-p flyspell-mode)
(flyspell-correct-word-before-point))
((looking-at-p "\\b")
(ispell-word))
(t
(progn (progn
(backward-word) (backward-word)
(when (looking-at-p "\\b") (when (looking-at-p "\\b")