branch: elpa/hyperdrive
commit b38e87aa7e1475dc41e9cd42754d42e97f59cf3d
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    Fix (h/restart): Provide format to with-demoted-errors
    
    It works without, but the compiler complains.
---
 hyperdrive.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index 08f48bda6d..793d028ecf 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -145,7 +145,7 @@ which see."
   ;; NOTE: Demote errors to continue execution in case the gateway is
   ;; stopped/stopping.  Don't pass FORMAT to `with-demoted-errors' since the
   ;; errors `h/stop' may signal are already prefixed with "Hyperdrive".
-  (with-demoted-errors (h/stop))
+  (with-demoted-errors "Hyperdrive: %S" (h/stop))
   (with-timeout (10 (h/error "Timed out waiting for gateway to stop"))
     (cl-loop while (h/gateway-live-p)
              do (sleep-for 0.2)))

Reply via email to