diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2022-12-20 16:56:32 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2022-12-20 16:56:32 +0100 |
commit | 720cd770bcbb8de40f308887bdfafe69020e6487 (patch) | |
tree | 4bb9896965473d60029e70cd32da2aba3f5875b0 | |
parent | 398e5bc8cc0dec0ff166952f5b212f7f236bd249 (diff) |
html: Use "article" for cards.
-rw-r--r-- | mumi/web/view/html.scm | 69 |
1 files changed, 36 insertions, 33 deletions
diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm index f24f1bd..0780992 100644 --- a/mumi/web/view/html.scm +++ b/mumi/web/view/html.scm @@ -259,43 +259,46 @@ simple query language. Here is a list of supported query terms:") " to submit a bug report.") ,(search-widget) - (div (@ (class "mt-4 h4")) "Recent activity " + (article + (h4 "Recent activity " (small (a (@ (href "recent")) "(More)"))) - (table - (@ (class "table table-borderless table-hover js-sort-table")) - (thead - (tr (@ (class "heading")) - (th (@ (class "js-sort-number")) "ID") - (th "Subject") - (th "Date submitted") - (th "Status"))) - (tbody - ,@(list-of-bugs (recent-bugs 10)))) + (table + (@ (role "grid") (class "js-sort-table")) + (thead + (tr (@ (class "heading")) + (th (@ (class "js-sort-number")) "ID") + (th "Subject") + (th "Date submitted") + (th "Status"))) + (tbody + ,@(list-of-bugs (recent-bugs 10))))) - (div (@ (class "mt-4 h4")) "Forgotten issues " + (article + (h4 "Forgotten issues " (small (a (@ (href "forgotten")) "(More)"))) - (table - (@ (class "table table-borderless table-hover js-sort-table")) - (thead - (tr (@ (class "heading")) - (th (@ (class "js-sort-number")) "ID") - (th "Subject") - (th "Date submitted") - (th "Status"))) - (tbody - ,@(list-of-bugs (forgotten-issues 10)))) + (table + (@ (role "grid") (class "js-sort-table")) + (thead + (tr (@ (class "heading")) + (th (@ (class "js-sort-number")) "ID") + (th "Subject") + (th "Date submitted") + (th "Status"))) + (tbody + ,@(list-of-bugs (forgotten-issues 10))))) - (div (@ (class "mt-4 h4")) "Priority bugs") - (table - (@ (class "table table-borderless table-hover js-sort-table")) - (thead - (tr (@ (class "heading")) - (th (@ (class "js-sort-number")) "ID") - (th "Subject") - (th "Date submitted") - (th "Status"))) - (tbody - ,@(priority-bugs))))))) + (article + (h4 "Priority bugs") + (table + (@ (role "grid") (class "js-sort-table")) + (thead + (tr (@ (class "heading")) + (th (@ (class "js-sort-number")) "ID") + (th "Subject") + (th "Date submitted") + (th "Status"))) + (tbody + ,@(priority-bugs)))))))) (define (help) (layout |