diff options
| author | ckonstanski <carlos.konstanski@olo.com> | 2026-01-06 18:56:24 -0700 |
|---|---|---|
| committer | ckonstanski <carlos.konstanski@olo.com> | 2026-01-06 18:56:24 -0700 |
| commit | a5fd76880291ea8135ee6b9a433082ed7fd11564 (patch) | |
| tree | 8f0f57f5bff89ec9a0a724774915965941347c36 /lisp/webapps/snow/site.lisp | |
| parent | db5241f5f05209ca23b380eff9d52bf653bd5b29 (diff) | |
[INF-18492] Automate Queue Retry and Log Streaming Retry octopus fix
Diffstat (limited to 'lisp/webapps/snow/site.lisp')
| -rw-r--r-- | lisp/webapps/snow/site.lisp | 20 |
1 files changed, 18 insertions, 2 deletions
diff --git a/lisp/webapps/snow/site.lisp b/lisp/webapps/snow/site.lisp index d1091ad..a640e9a 100644 --- a/lisp/webapps/snow/site.lisp +++ b/lisp/webapps/snow/site.lisp @@ -132,7 +132,19 @@ `(octopus-latest-deployments-view-json)) (defmacro .octopus-latest-deployments-results () - `(octopus-latest-deployments-results-json ode_only_p)) + `(octopus-latest-deployments-results-json ode_only_p environment project)) + +(defmacro .octopus-qrs-lsrs-redeploy () + `(octopus-qrs-lsrs-redeploy-json)) + +(defmacro .octopus-qrs-lsrs-redeploy-view () + `(octopus-qrs-lsrs-redeploy-view-json)) + +(defmacro .octopus-qrs-lsrs-redeploy-results () + `(octopus-qrs-lsrs-redeploy-results-json environment)) + +(defmacro .octopus-qrs-lsrs-redeploy-results-submit () + `(octopus-qrs-lsrs-redeploy-results-submit-json)) (define-endpoint :get "/" () .base) (define-endpoint :post "/location" ((location :parameter-type 'string)) .location) @@ -167,4 +179,8 @@ (define-endpoint :post "/octopus-ode-deploy-release/results" ((project_name :parameter-type 'string) (version :parameter-type 'string) (ode_names :parameter-type 'string)) .octopus-ode-deploy-release-results) (define-endpoint :get "/octopus-latest-deployments" () .octopus-latest-deployments) (define-endpoint :get "/octopus-latest-deployments/view" () .octopus-latest-deployments-view) -(define-endpoint :post "/octopus-latest-deployments/results" ((ode_only_p :parameter-type 'string)) .octopus-latest-deployments-results) +(define-endpoint :post "/octopus-latest-deployments/results" ((ode_only_p :parameter-type 'string) (environment :parameter-type 'string) (project :parameter-type 'string)) .octopus-latest-deployments-results) +(define-endpoint :get "/octopus-qrs-lsrs-redeploy" () .octopus-qrs-lsrs-redeploy) +(define-endpoint :get "/octopus-qrs-lsrs-redeploy/view" () .octopus-qrs-lsrs-redeploy-view) +(define-endpoint :post "/octopus-qrs-lsrs-redeploy/results" ((environment :parameter-type 'string)) .octopus-qrs-lsrs-redeploy-results) +(define-endpoint :post "/octopus-qrs-lsrs-redeploy/results/submit" () .octopus-qrs-lsrs-redeploy-results-submit) |