branch: externals/consult
commit 0862079f9f4f54379afb567728afbe631644522c
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    Fix consult--man-preview
---
 consult.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/consult.el b/consult.el
index 3eca6e3e03..48fce51461 100644
--- a/consult.el
+++ b/consult.el
@@ -5442,7 +5442,7 @@ details regarding the asynchronous search."
                  (and cand
                       (eq action 'preview)
                       (or (cdr (assoc cand buffers))
-                          (let ((buf (consult--man-action cand t)))
+                          (when-let ((buf (consult--man-action cand t)))
                             (unless (memq buf orig)
                               (cl-callf consult--preview-add-buffer
                                   buffers (cons cand buf)))

Reply via email to