branch: elpa/hyperdrive
commit 78738cc04a46d9460a8df56734e08e5e235d6416
Author: Joseph Turner <jos...@ushin.org>
Commit: Joseph Turner <jos...@ushin.org>
Fix: (hyperdrive-menu) Only display selected when point is on entry
---
hyperdrive-menu.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index f4c88e2b55..680220229a 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -165,7 +165,8 @@
[ ;; Selected
:if (lambda ()
(and (oref transient--prefix scope)
- (eq major-mode 'hyperdrive-dir-mode)))
+ (eq major-mode 'hyperdrive-dir-mode)
+ (hyperdrive-dir--entry-at-point)))
:description
(lambda ()
(concat (propertize "Selected: " 'face 'transient-heading)
