[elpa] externals/consult 49144b6a1f: consult-minor-mode-menu: Hide errors when formatting lighters

[ELPA Syncer]

branch: externals/consult
commit 49144b6a1f4ce639093c181402a5b29e6eeebd3b
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    consult-minor-mode-menu: Hide errors when formatting lighters
---
 consult.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/consult.el b/consult.el
index 9aff744516..4dbe3ace7c 100644
--- a/consult.el
+++ b/consult.el
@@ -4264,9 +4264,10 @@ starts a new Isearch session otherwise."
     (delq nil
           (mapcar (pcase-lambda (`(,sym ,lighter))
                     (when (and lighter (not (equal "" lighter)))
-                      (setq lighter (string-trim (format-mode-line lighter)))
-                      (unless (string-blank-p lighter)
-                        (cons lighter sym))))
+                      (let (message-log-max)
+                        (setq lighter (string-trim (format-mode-line lighter)))
+                        (unless (string-blank-p lighter)
+                          (cons lighter sym)))))
                   minor-mode-alist)))))
 
 (defconst consult--minor-mode-menu-narrow