html: Use "main" element for all containers.

1 files changed, 7 insertions, 7 deletions

diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm
index 28dd9bb..d21774f 100644
--- a/mumi/web/view/html.scm
+++ b/mumi/web/view/html.scm
@@ -303,7 +303,7 @@ simple query language.  Here is a list of supported query terms:")
   (layout
    #:body
    `(,(header #:search-bar? #f)
-     (div
+     (main
       (@ (class "container"))
       (h1 "Help")
       (a (@ (href "search")))
@@ -396,7 +396,7 @@ some examples.")
   (layout
    #:body
    `(,(header)
-     (div (@ (class "container"))
+     (main (@ (class "container"))
           (h1 "Issue not found")
           (p "There is no submission with id " (strong ,id) ", or we
 failed to process associated messages.")
@@ -406,7 +406,7 @@ failed to process associated messages.")
   (layout
    #:body
    `(,(header)
-     (div (@ (class "container"))
+     (main (@ (class "container"))
           (h1 "Error")
           (p "An error occurred.  Sorry about that!")
           ,message
@@ -684,7 +684,7 @@ currently disabled."))
        #:title (bug-subject* bug)
        #:body
        `(,(header #:title (bug-subject* bug))
-         (div
+         (main
           (@ (class "container"))
           ,@(match flash-message
               (('error . text)
@@ -765,7 +765,7 @@ m1 3H6v5h2V4zm0 6H6v2h2v-2z")))))
   (layout
    #:body
    `(,(header #:search-bar? #f)
-     (div
+     (main
       (@ (class "container"))
       (h1 "Recent issues")
       (table
@@ -783,7 +783,7 @@ m1 3H6v5h2V4zm0 6H6v2h2v-2z")))))
   (layout
    #:body
    `(,(header #:search-bar? #f)
-     (div
+     (main
       (@ (class "container"))
       (h1 "Forgotten issues")
       (table
@@ -801,7 +801,7 @@ m1 3H6v5h2V4zm0 6H6v2h2v-2z")))))
   (layout
    #:body
    `(,(header #:search-bar? #f)
-     (div
+     (main
       (@ (class "container"))
       (h1 "Your search for " (code ,query))
       ,(search-widget #:text query)