From a7feb312d9b86c68ff93a191359756eff1645d87 Mon Sep 17 00:00:00 2001 From: Grant Shangreaux Date: Tue, 24 Jan 2023 22:50:07 -0600 Subject: Add: emoji icon links and aria-labels to navbar [frontend] --- pages.lisp | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) diff --git a/pages.lisp b/pages.lisp index 9900980..c6041fe 100644 --- a/pages.lisp +++ b/pages.lisp @@ -40,14 +40,13 @@ (defun navbar () (with-html - (:div - :class "navbar" - (:div :class "logo" "DND") - (:ul :class "nav-links" - (:li (:a :href "/hero" "Hero")) - (:li (:a :href "/inventory" "Loot")) - (:li (:a :href "/quests" "Quests")) - (:li (:a :href "/tavern" "Tavern")))))) + (:nav :class "navbar" :aria-label "Navigation" + (:div :class "logo" :aria-label "DND logo" "DND") + (:ul :class "nav-links" :aria-label "Nav links" + (:li (:a :href "/hero" :aria-label "Hero profile" "🧝")) + (:li (:a :href "/inventory" :aria-label "Inventory" "🎒")) + (:li (:a :href "/quests" :aria-label "Quests" "📜")) + (:li (:a :href "/tavern" :aria-label "Tavern" "🍺")))))) (defun hall-of-heroes () (with-html -- cgit v1.2.3