summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorckonstanski <carlos.konstanski@olo.com>2026-01-09 10:28:45 -0700
committerckonstanski <carlos.konstanski@olo.com>2026-01-09 10:28:45 -0700
commit07f67d57296c8c1e52c5283b7d710eeb99ac8384 (patch)
tree9da224ce1b943b836b3d465db147b6af91f68e6a /lisp
parent32505d0b654c8dc557de0a055a7f5d1d1909153a (diff)
Add health check field to octopus-machine output
Diffstat (limited to 'lisp')
-rw-r--r--lisp/octopus/octopus.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/octopus/octopus.lisp b/lisp/octopus/octopus.lisp
index 61302bf..3a31255 100644
--- a/lisp/octopus/octopus.lisp
+++ b/lisp/octopus/octopus.lisp
@@ -207,7 +207,8 @@ as an input filter are stored here for the ride through the queue.")
(make-instance 'octopus-machine
:id (id octopus-machine)
:name (name octopus-machine)
- :roles (roles octopus-machine)))
+ :roles (roles octopus-machine)
+ :health-status (health-status octopus-machine)))
(defmacro define-octopus-api-call ((method-name) &body macro-body)
(let ((endpoint (gensym)))