diff --git a/src/main.lisp b/src/main.lisp
index 34203df..ae6a50d 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -356,7 +356,7 @@ with the image attached"
               (:table
                (loop for row in form
                      do (:tr
-                         (:th (car row))
+                         (:th (string-capitalize (car row)))
                          (:td (cdr row))))))))))))
 
 (tbnl:define-easy-handler (health-form :uri "/health-form") ()