branch: elpa/hyperdrive
commit e3261cd98aa39711db87ef21da4cdecf64ed9476
Author: Adam Porter <[email protected]>
Commit: Joseph Turner <[email protected]>
Fix: (h/install) Also refresh menu if install fails
---
hyperdrive.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/hyperdrive.el b/hyperdrive.el
index 908528b75a..9551c9e2ac 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -1307,6 +1307,7 @@ If FORCEP, don't prompt for confirmation before
downloading."
;; TODO: Prompt before downloading.
(download url sha256))
(setf h/install-in-progress-p nil)
+ (h/menu-refresh)
(h/error "Downloading failed; no more mirrors available")))
(head-size (url)
(when-let ((response (plz 'head url :as 'response)))
