diff options
| author | ckonstanski <kostcarl@isu.edu> | 2026-08-16 13:28:23 -0600 |
|---|---|---|
| committer | ckonstanski <kostcarl@isu.edu> | 2026-08-16 13:28:23 -0600 |
| commit | e46e242b8d7cc08e2f3edfc7effee706d058d201 (patch) | |
| tree | 3022b842f1be9f89de1ccfd493dd82960d4e2c8f /lisp/service/home-service.lisp | |
| parent | b52fa04a73e3e2ccaa1bf1d4949db331d2a095ee (diff) | |
migrate to react
Diffstat (limited to 'lisp/service/home-service.lisp')
| -rw-r--r-- | lisp/service/home-service.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/service/home-service.lisp b/lisp/service/home-service.lisp index da6ded6..30e5a03 100644 --- a/lisp/service/home-service.lisp +++ b/lisp/service/home-service.lisp @@ -16,3 +16,6 @@ (with-noauth (instance home-service) (when (not (org-ckons-core::null-or-empty-p message)) (setf (message instance) message)) (when (not (org-ckons-core::null-or-empty-p errormsg)) (setf (errormsg instance) errormsg)))) + +(define-endpoint ("/home" :method :get) () home-json) +(define-endpoint ("/home" :method :post) (&post (message :parameter-type 'string) (errormsg :parameter-type 'string)) home-json message errormsg) |