branch: elpa/hyperdrive
commit fd1c9212a2a4756f666a740c237c11f7620e2b98
Author: Joseph Turner <jos...@ushin.org>
Commit: Joseph Turner <jos...@ushin.org>
Change: (hyperdrive-menu) Remove hyperdrive-menu-up
It would be nice to keep the transient active *and* display the
updated directory buffer.
---
hyperdrive-menu.el | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index 87b0e30f50..db9bc24a11 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -50,11 +50,6 @@
;; hyperdrive-current-entry))
;; ,@body))))
-(transient-define-suffix hyperdrive-menu-up ()
- ;; :transient 'transient--do-call
- (interactive)
- (hyperdrive-menu (hyperdrive-parent (oref transient-current-prefix scope))))
-
(transient-define-prefix hyperdrive-menu (entry)
"Show the hyperdrive transient menu."
@@ -78,7 +73,7 @@
(concat (propertize "Current directory: " 'face 'transient-heading)
(propertize (hyperdrive--format-path (hyperdrive-entry-path
entry))
'face 'transient-value))))
- ("d ^" "Up to parent" hyperdrive-menu-up)
+ ("d ^" "Up to parent" hyperdrive-up)
("o" "Sort" hyperdrive-dir-sort)]
[ ;; File at point
:if (lambda ()
