branch: elpa/hyperdrive
commit a764b5e0e687e687e374a046188296a7702b7be4
Author: Adam Porter <[email protected]>
Commit: Joseph Turner <[email protected]>
Change: (h/gateway-installing-p) Just test variable, and explain why
---
hyperdrive-lib.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index fb6df264bb..a7cc374c5c 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1485,7 +1485,11 @@ process is running."
(defun h/gateway-installing-p ()
"Return non-nil if the gateway program is being installed."
- (process-live-p h/install-process))
+ ;; If this variable is non-nil, it might be a dead process, but it is
+ ;; interpreted to mean that we are still trying to download and install the
+ ;; gateway, because we are still trying other sources; we will set the
+ ;; variable nil when we succeed, give up, or are canceled.
+ h/install-process)
(defun h/gateway-installed-p ()
"Return non-nil if the gateway program is installed."
