branch: elpa/hyperdrive
commit b52601fdb533ecc5f25d9e72dd513317e1ba3bba
Author: Joseph Turner <[email protected]>
Commit: Joseph Turner <[email protected]>

    Change: (hyperdrive-menu) "not found" gateway status indicator
---
 hyperdrive-menu.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index ca581d4917..ce6f7ad13b 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -208,6 +208,11 @@
               (propertize
                (cond ((h//gateway-ready-p) "on")
                      ((h/gateway-live-p) "starting")
+                     ((and (equal h/gateway-start-function
+                                  (eval (car (get 'h/gateway-start-function
+                                                  'standard-value))))
+                           (not (h//hyper-gateway-ushin-path)))
+                      "not found")
                      (t "off"))
                'face 'transient-value)))
     ("G s" "Start" h/start

Reply via email to