[nongnu] elpa/hyperdrive 44b2dffb76 081/123: Change: (-menu) Add bindings for copy-url and download-entry in file

[ELPA Syncer]

branch: elpa/hyperdrive
commit 44b2dffb76a8cf238a1ac36b82d430be6998df46
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Change: (-menu) Add bindings for copy-url and download-entry in file
---
 hyperdrive-menu.el | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index 96ed0d3e6b..ad4e05bb26 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -89,7 +89,15 @@
            (eq major-mode 'hyperdrive-dir-mode))
      :transient t)
     ("n" "next" hyperdrive-ewoc-next
-     :transient t)]
+     :if (lambda ()
+           (eq major-mode 'hyperdrive-dir-mode))
+     :transient t)
+    ("w" "Copy URL" hyperdrive-copy-url
+     :if (lambda ()
+           (not (eq major-mode 'hyperdrive-dir-mode))))
+    ("d" "Download" hyperdrive-download
+     :if (lambda ()
+           (not (eq major-mode 'hyperdrive-dir-mode))))]
    [ ;; At point
     :if (lambda ()
           (let ((entry (oref transient--prefix scope)))