[elpa] externals/consult 3dbb147975: Use always

[ELPA Syncer]

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

    Use always
---
 consult.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/consult.el b/consult.el
index e3add04cb5..e7ff7404a4 100644
--- a/consult.el
+++ b/consult.el
@@ -2444,7 +2444,7 @@ Optional source fields:
                              (apply-partially #'consult--add-history nil 
add-history))))
     (car (consult--with-preview
              preview-key state
-             (lambda (_narrow inp _cand) (funcall transform inp)) (lambda () t)
+             (lambda (_narrow inp _cand) (funcall transform inp)) #'always
            (read-from-minibuffer prompt initial nil nil history default 
inherit-input-method)))))
 
 (cl-defun consult--prompt (&rest options &key prompt history add-history 
initial default