From a73b31c1ca88d0cba7365e648e3da70c4124f27e Mon Sep 17 00:00:00 2001 From: colin Date: Sat, 1 Apr 2023 15:53:13 -0700 Subject: Reorganizing the adventure page --- src/view-components.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/view-components.lisp') diff --git a/src/view-components.lisp b/src/view-components.lisp index 0711dda..1c21952 100644 --- a/src/view-components.lisp +++ b/src/view-components.lisp @@ -9,7 +9,7 @@ lists. CLASS is the lass string for the containing list. ITEM-CLASS is the class string for the contained list items." (with-html - (:ol :class class + (:ul :class class (dolist (item data) (:li :class item-class (render :list-item item)))))) @@ -49,3 +49,4 @@ the class string for the contained list items." (:li (:a :href "/quests" :aria-label "Quests" "📜")) (:li (:a :href "/tavern" :aria-label "Tavern" "🍺")))))) + -- cgit v1.2.3