From 24fc3ae9367fab7468cd3600cc4c3f61ad9506f6 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 9 Sep 2026 23:09:18 -0700 Subject: view/book: Show some info about the book --- src/view/book.phel | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) (limited to 'src/view') diff --git a/src/view/book.phel b/src/view/book.phel index 79341ad..802c46f 100644 --- a/src/view/book.phel +++ b/src/view/book.phel @@ -8,4 +8,15 @@ [:head [:title (str "Book: " (:title book) " - Lezer")]] [:body - [:h1 (:title book)]]])) + [:h1 (:title book)] + [:h2 "Authors"] + [:ul + (for [author :in (:authors book)] + [:li (:name author)])] + [:h2 "Sessions"] + [:ul + (for [session :in (:sessions book)] + [:li + (:status session) + ": " + (:started_at session)])]]])) -- cgit v1.3-2-g0d8e