From 9d4733413c791c8e4f589a197a0da91dad279740 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Tue, 25 Aug 2026 23:02:08 -0700 Subject: Add author page --- src/view/author.phel | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/view/author.phel (limited to 'src/view/author.phel') diff --git a/src/view/author.phel b/src/view/author.phel new file mode 100644 index 0000000..4253941 --- /dev/null +++ b/src/view/author.phel @@ -0,0 +1,14 @@ +(ns lezer.view.author + (:require phel.html :refer [html doctype])) + +(defn author-html [author books] + (html + (doctype :html5) + [:html + [:head + [:title (str "Author: " author " - Lezer")]] + [:body + [:h1 (:name author)] + [:ul + (for [book :in books] + [:li (:title book)])]]])) -- cgit v1.3-2-g0d8e