From 1fb7ce77dfbd0ac5ca9bdfdc53518148ae1b4012 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 10 Oct 2005 04:03:09 +0000 Subject: [PATCH] (flyspell-check-word-p): If unread-command-events is non-empty, don't call sit-for. --- lisp/ChangeLog | 5 +++++ lisp/textmodes/flyspell.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5ae269835f9..d2aada89bb1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-10-10 Kenichi Handa + + * textmodes/flyspell.el (flyspell-check-word-p): + If unread-command-events is non-empty, don't call sit-for. + 2005-10-09 Richard M. Stallman * font-lock.el (font-lock-syntactic-keywords) diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 10d61e0852a..74c7cbc5762 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el @@ -772,7 +772,8 @@ Mostly we check word delimiters." ((get this-command 'flyspell-delayed) ;; the current command is not delayed, that ;; is that we must check the word now - (sit-for flyspell-delay)) + (and (not unread-command-events) + (sit-for flyspell-delay))) (t t))) (t t))) -- 2.39.5