branch: externals/orderless
commit 2adfaea003790614ce52e7aee3169f90c1a8769b
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    orderless-kwd-documentation: Add support for `embark-bindings`
---
 orderless-kwd.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/orderless-kwd.el b/orderless-kwd.el
index 3b1bac4ded..9738b22ceb 100644
--- a/orderless-kwd.el
+++ b/orderless-kwd.el
@@ -112,7 +112,8 @@ as a flag and does not require input."
 (defun orderless-kwd-documentation (pred regexp)
   "Match documentation against PRED and REGEXP."
   (lambda (str)
-    (when-let ((sym (intern-soft str)))
+    (when-let ((sym (or (get-text-property 0 'embark-command str)
+                        (intern-soft str))))
       (orderless--match-p
        pred regexp
        (or (ignore-errors (documentation sym))

Reply via email to