diff options
| author | ckonstanski <kostcarl@isu.edu> | 2026-07-19 22:05:02 -0600 |
|---|---|---|
| committer | ckonstanski <kostcarl@isu.edu> | 2026-07-19 22:05:02 -0600 |
| commit | e7301bcd63c0cbfc4d55f21d0d7c33c7557d6444 (patch) | |
| tree | 2fc51725eb8931c09df6d9360bb358e7645a5244 /lisp/service/about-us-service.lisp | |
| parent | 08e435104c42751689553537b1f20ffb14b8dfcc (diff) | |
starting resume logic
Diffstat (limited to 'lisp/service/about-us-service.lisp')
| -rw-r--r-- | lisp/service/about-us-service.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/service/about-us-service.lisp b/lisp/service/about-us-service.lisp index c479efe..71b5b70 100644 --- a/lisp/service/about-us-service.lisp +++ b/lisp/service/about-us-service.lisp @@ -9,8 +9,10 @@ :accessor category)) (:documentation "")) -(defun about-us-json (category) +(defun about-us-json (category &optional message errormsg) (with-noauth (instance about-us-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)) (setf (category instance) category))) (defclass about-us/view-service (about-us-service) |