diff --git a/src/main.lisp b/src/main.lisp index 85796fe..182caef 100644 --- a/src/main.lisp +++ b/src/main.lisp @@ -444,7 +444,7 @@ with the image attached" "If you'd like to pay for your registration go to the donate tab in the top right when you are ready and find the camp registration option."))))))) (progn (uiop:println "Health now") - (setf (tbnl:header-out :HX-Redirect) (format nil "/camp-health-form?registration=~A" registration)) + (setf (tbnl:header-out :HX-Redirect) (format nil "/camp-health-form/?registration=~A" registration)) (uiop:println (tbnl:headers-out*)) (mail-camp-form data nil)))))