From 44f7a0a4da7cc45d638e4b64fbf47cb1afc51292 Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Fri, 7 Aug 2026 19:11:49 -0600 Subject: lots of react migration --- lisp/service/about-us-service.lisp | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'lisp/service/about-us-service.lisp') diff --git a/lisp/service/about-us-service.lisp b/lisp/service/about-us-service.lisp index 71b5b70..efbcbd2 100644 --- a/lisp/service/about-us-service.lisp +++ b/lisp/service/about-us-service.lisp @@ -66,3 +66,9 @@ (update-record general-pkg about-us)))) (setf (content instance) content) (setf (message instance) "About Us text saved successfully."))) + +(define-endpoint ("/home" :method :get) () about-us-json "home") +(define-endpoint ("/home" :method :post) (&post (message :parameter-type 'string) (errormsg :parameter-type 'string)) about-us-json "home" message errormsg) +(define-endpoint ("/home/view" :method :get) () about-us-view-json "home") +(define-endpoint ("/home/modify" :method :post) () about-us-modify-json "home") +(define-endpoint ("/home/modify/submit" :method :post) (&post (content :parameter-type 'string)) about-us-modify-submit-json "home" content) -- cgit v1.3