diff --git a/src/views/surveys.lisp b/src/views/surveys.lisp
index c0ebe4a..80d659b 100644
--- a/src/views/surveys.lisp
+++ b/src/views/surveys.lisp
@@ -12,25 +12,25 @@
 (defun surveys (surveys)
   "Generates the view to show all surveys available."
   (with-page (:title "Surveys")
-    (navbar-en)
-    (:section :class "container"
-              (:h2 :class "mb-3"
-                   "Your Surveys")
-              (:div :class "btn-toolbar my-3"
-                    (:div :class "btn-group me-2"
-                          (:a :class "btn btn-primary"
-                              :href "/new-survey"
-                              "New Survey")))
-              (:ol :class "list-group list-group-numbered"
-                   (loop for survey in surveys
-                         for title = (extract-title survey)
-                         for description = (extract-description survey)
-                         for id = (extract-id survey) do
-                           (:li :class "list-group-item d-flex justify-content-between align-items-start"
-                                (:div :class "ms-2 me-auto"
-                                      (:a :class "fw-bold clearfix"
-                                          :href (format nil "/survey/~a" id)
-                                          title)
-                                      (if description
-                                          (:span description)
-                                          nil))))))))
+    (body-header "Surveys" (navbar-en))
+    (:main :id "main-content"
+           :class "container"
+           (:div :class "btn-toolbar my-3"
+                 (:div :class "btn-group me-2"
+                       (:a :class "btn btn-primary"
+                           :href "/new-survey"
+                           "New Survey")))
+           (:h2 :class "mb-3" "Overview")
+           (:ol :class "list-group list-group-numbered"
+                (loop for survey in surveys
+                      for title = (extract-title survey)
+                      for description = (extract-description survey)
+                      for id = (extract-id survey) do
+                        (:li :class "list-group-item d-flex justify-content-between align-items-start"
+                             (:div :class "ms-2 me-auto"
+                                   (:a :class "fw-bold clearfix"
+                                       :href (format nil "/survey/~a" id)
+                                       title)
+                                   (if description
+                                       (:span description)
+                                       nil))))))))