[elpa] externals/consult 054143c394: consult-history: Report more categories

[ELPA Syncer]

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

    consult-history: Report more categories
---
 consult.el | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/consult.el b/consult.el
index af58921e2f..df604c4fd0 100644
--- a/consult.el
+++ b/consult.el
@@ -3659,10 +3659,15 @@ as argument. See also `cape-history' from the Cape 
package."
                     (user-error "History is empty"))
                 :prompt "History: "
                 :history t ;; disable history
-                :category ;; Report command category for M-x history
+                :category ;; Report category depending on history variable
                 (and (minibufferp)
-                     (eq minibuffer-history-variable 'extended-command-history)
-                     'command)
+                     (pcase minibuffer-history-variable
+                       ('extended-command-history 'command)
+                       ('buffer-name-history 'buffer)
+                       ('face-name-history 'face)
+                       ('read-envvar-name-history 'environment-variable)
+                       ('bookmark-history 'bookmark)
+                       ('file-name-history 'file)))
                 :sort nil
                 :state (consult--insertion-preview (point) (point))))))
     (when (minibufferp)