(flyspell-check-word-p): Don't delay inside a kbd macro.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index ca951ca1deb..ab6319d698e 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -322,7 +322,7 @@ flyspell-buffer checks the whole buffer."
         (put 'ispell-filter-continue 'permanent-local t)
         (put 'ispell-process-directory 'permanent-local t)
         (put 'ispell-parser 'permanent-local t)))
-  ;; We put the `flyspel-delayed' property on some commands.
+  ;; We put the `flyspell-delayed' property on some commands.
   (flyspell-delay-commands)
   ;; we bound flyspell action to post-command hook
   (make-local-hook 'post-command-hook)
@@ -466,6 +466,9 @@ Mostly we check word delimiters."
    ((not (integerp flyspell-delay))
     ;; yes because the user had set up a no-delay configuration.
     t)
+   (executing-kbd-macro
+    ;; Don't delay inside a keyboard macro.
+    t)
    (t
     (if (fboundp 'about-xemacs)
         (sit-for flyspell-delay nil)