branch: elpa/hyperdrive
commit ec8c2caa59ab95f9497d48c089aca33ef0caaa41
Author: Joseph Turner <[email protected]>
Commit: Joseph Turner <[email protected]>
Change: (h/menu-bar-menu) Add "Cancel install"
---
hyperdrive.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/hyperdrive.el b/hyperdrive.el
index 67ce945c95..f7f520eeed 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -838,7 +838,11 @@ The return value of this function is the retrieval buffer."
"Upgrade gateway")
((h/gateway-installed-p) "Reinstall gateway")
(t "Install gateway"))
- :help "Download and install gateway"])
+ :visible (not (hyperdrive-gateway-installing-p))
+ :help "Download and install gateway"]
+ ["Cancel install" h/cancel-install
+ :visible (hyperdrive-gateway-installing-p)
+ :help "Cancel running download/installation"])
"---"
["Open URL" h/open-url
:help "Load a hyperdrive URL"]
