branch: externals/hydra
commit e228432bb64385f67f20aa525bce56ae4e8419eb
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>
hydra.el (hydra--hint-from-matrix): Adjust for "%" in key
Fixes #269
---
hydra.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/hydra.el b/hydra.el
index f569615b57..d1f4ee6ff2 100644
--- a/hydra.el
+++ b/hydra.el
@@ -1078,7 +1078,8 @@ Each head must have a property max-key-len and
max-doc-len."
(mapconcat (lambda (head)
(funcall hydra-key-doc-function
(hydra-fontify-head head body) ;; key
- (hydra--head-property head :max-key-len)
+ (let ((n (hydra--head-property head
:max-key-len)))
+ (+ n (cl-count ?% (car head))))
(nth 2 head) ;; doc
(hydra--head-property head
:max-doc-len)))
heads-in-row "| "))
