loads of tweaks for adding may newsletter and misson trip reports
This includes server pieces that are not live just yet
This commit is contained in:
parent
a0f462eae0
commit
341c3cbcd3
37 changed files with 62 additions and 23 deletions
Binary file not shown.
Before Width: | Height: | Size: 679 KiB After Width: | Height: | Size: 679 KiB |
|
@ -67,7 +67,7 @@
|
|||
:external-format :latin-1))
|
||||
|
||||
(hunchentoot:define-easy-handler (respond :uri "/health-form") ()
|
||||
(setf (hunchentoot:content-type*) "application/json")
|
||||
(setf (hunchentoot:content-type*) "plain/text")
|
||||
(let ((request-type (hunchentoot:request-method hunchentoot:*request*)))
|
||||
(cond ((eq request-type :get) nil)
|
||||
((eq request-type :post)
|
||||
|
@ -133,5 +133,6 @@
|
|||
(apply #'concatenate 'string content) image-file-name)))
|
||||
|
||||
(setq *last-list-data* (append *last-list-data* form-list))))
|
||||
(post-health-form *last-list-data*))))))
|
||||
(post-health-form *last-list-data*)
|
||||
(format nil "thankyou"))))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue