emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/jinx 236e81d391 2/3: jinx--force-overlays: Use with-del


From: ELPA Syncer
Subject: [elpa] externals/jinx 236e81d391 2/3: jinx--force-overlays: Use with-delayed-message
Date: Sun, 26 Mar 2023 16:59:04 -0400 (EDT)

branch: externals/jinx
commit 236e81d391b791c52f3cd9e532f202340938e3e3
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    jinx--force-overlays: Use with-delayed-message
---
 jinx.el | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/jinx.el b/jinx.el
index 81126d1172..93d49ff384 100644
--- a/jinx.el
+++ b/jinx.el
@@ -462,14 +462,12 @@ Returns a pair of updated (START END) bounds."
 (defun jinx--force-overlays (start end)
   "Enforce spell-check of region between START and END.
 Return list of overlays, see `jinx--get-overlays'."
-  (let (message-log-max)
-    (message "Fontifying...")
-    (jit-lock-fontify-now)
-    (message "Checking...")
+  (with-delayed-message (1 "Fontifying...")
+    (jit-lock-fontify-now))
+  (with-delayed-message (1 "Checking...")
     (setq start (jinx--check-region start end)
-          end (cdr start) start (car start))
-    (message "Done")
-    (jinx--get-overlays start end)))
+          end (cdr start) start (car start)))
+  (jinx--get-overlays start end))
 
 (defun jinx--annotate-suggestion (word)
   "Annotate WORD during completion."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]