src/view/author.phel


1
2
3
4
5
6
7
8
9
10
11
12
13
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)])]]]))