diff options
| -rw-r--r-- | pages.lisp | 15 |
1 files changed, 7 insertions, 8 deletions
@@ -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 |