[elpa] externals/consult 83c007ac60: Improve consult-narrow-help, use key-description (See #713)

[ELPA Syncer]

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

    Improve consult-narrow-help, use key-description (See #713)
---
 consult.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/consult.el b/consult.el
index 76f471637c..ede6e0953e 100644
--- a/consult.el
+++ b/consult.el
@@ -1697,13 +1697,13 @@ to make it available for commands with narrowing."
   (consult--require-minibuffer)
   (let ((minibuffer-message-timeout 1000000))
     (minibuffer-message
-     (mapconcat
-      (lambda (x) (concat
-                   (propertize (char-to-string (car x)) 'face 'consult-key) " "
+     (mapconcat (lambda (x)
+                  (concat
+                   (propertize (key-description (list (car x))) 'face 
'consult-key)
+                   " "
                    (propertize (cdr x) 'face 'consult-help)))
-      (seq-filter (lambda (x) (/= (car x) 32))
-                  consult--narrow-keys)
-      " "))))
+                consult--narrow-keys
+                " "))))
 
 (defun consult--narrow-setup (settings map)
   "Setup narrowing with SETTINGS and keymap MAP."