From 8686845ed907b986ac7c95169b6396300ee114c2 Mon Sep 17 00:00:00 2001
From: Yanghao Xie <yhaoxie@gmail.com>
Date: Tue, 14 May 2019 18:47:20 +0800
Subject: [PATCH] avy.el (avy-flyspell-correct-function): Add

Fixes #273
---
 avy.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/avy.el b/avy.el
index 25d89e9..0055fcb 100644
--- a/avy.el
+++ b/avy.el
@@ -748,6 +748,11 @@ Set `avy-style' according to COMMMAND as well."
 
 (declare-function flyspell-correct-word-before-point "flyspell")
 
+(defcustom avy-flyspell-correct-function #'flyspell-correct-word-before-point
+  "Function called to correct word by `avy-action-ispell' when
+`flyspell-mode' is enabled."
+  :type 'function)
+
 (defun avy-action-ispell (pt)
   "Auto correct word at PT."
   (save-excursion
@@ -758,7 +763,7 @@ Set `avy-style' according to COMMMAND as well."
         (line-beginning-position)
         (line-end-position)))
       ((bound-and-true-p flyspell-mode)
-       (flyspell-correct-word-before-point))
+       (funcall avy-flyspell-correct-function))
       ((looking-at-p "\\b")
        (ispell-word))
       (t