branch: elpa/hyperdrive
commit db38eae6400edc8d18e7418da852ab772955a45c
Author: Joseph Turner <[email protected]>
Commit: Joseph Turner <[email protected]>
Tidy: (h/menu-bar-menu) Remove unnecessary "Reinstall" label
---
hyperdrive.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/hyperdrive.el b/hyperdrive.el
index 9206561069..b0217483bd 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -832,9 +832,7 @@ The return value of this function is the retrieval buffer."
["Gateway version" h/gateway-version
:help "Say hyper-gateway-ushin version"]
["Install gateway" h/install
- :label (cond ((h/gateway-needs-upgrade-p) "Upgrade gateway")
- ((h/gateway-installed-p) "Reinstall gateway")
- (t "Install gateway"))
+ :label (if (h/gateway-needs-upgrade-p) "Upgrade" "Install")
:visible (and (not (h/gateway-installing-p))
(or (not (h/gateway-installed-p))
(h/gateway-needs-upgrade-p)))
