branch: elpa/hyperdrive
commit 8e8259d1dcd021bfde4e46ca5be296aba79599dc
Author: Joseph Turner <[email protected]>
Commit: Joseph Turner <[email protected]>
Fix: (h//gateway-stop-default) Use live-p-default
If the user has configured h/gateway-live-p, it may return non-nil
even when the gateway is running outside of Emacs.
---
hyperdrive-lib.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 93abbb7d6a..34cfaae62a 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1465,7 +1465,7 @@ Default function; see variable
`h/gateway-start-function'."
(defun h//gateway-stop-default ()
"Stop the gateway subprocess."
- (unless (h/gateway-live-p)
+ (unless (h/gateway-live-p-default)
;; NOTE: We do not try to stop the process if we didn't start it ourselves.
(h/error "Gateway not running as subprocess"))
(interrupt-process h/gateway-process)
