[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 576a54fced: Unset set-message-function during w
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/consult 576a54fced: Unset set-message-function during with-delayed-message (bug#63253) |
|
Date: |
Tue, 9 May 2023 13:57:40 -0400 (EDT) |
branch: externals/consult
commit 576a54fced02bbddc9b09bf41752b3371e8ca829
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Unset set-message-function during with-delayed-message (bug#63253)
---
consult.el | 10 ++++------
1 file changed, 4 insertions(+), 6 deletions(-)
diff --git a/consult.el b/consult.el
index 35f2edf8f4..b912c83f9d 100644
--- a/consult.el
+++ b/consult.el
@@ -894,12 +894,10 @@ When no project is found and MAY-PROMPT is non-nil ask
the user."
"Show delayed MESSAGE if BODY takes too long.
Also temporarily increase the GC limit via `consult--with-increased-gc'."
(declare (indent 1))
- ;; FIXME `with-delayed-message' is broken in combination with
- ;; `inhibit-message'. Report this as a bug.
- (ignore message)
- `(progn ;; with-delayed-message (1 ,message)
- (consult--with-increased-gc
- ,@body)))
+ `(let (set-message-function) ;; bug#63253: Broken `with-delayed-message'
+ (with-delayed-message (1 ,message)
+ (consult--with-increased-gc
+ ,@body))))
(defun consult--count-lines (pos)
"Move to position POS and return number of lines."
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult 576a54fced: Unset set-message-function during with-delayed-message (bug#63253),
ELPA Syncer <=