From 3e1a51d4832939d7ba4d753142a45cdbbcacb817 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Tue, 8 Sep 2026 23:21:08 -0700 Subject: Remove unused definitions --- src/view/main.phel | 16 +--------------- 1 file changed, 1 insertion(+), 15 deletions(-) (limited to 'src/view') diff --git a/src/view/main.phel b/src/view/main.phel index dc57f3c..e25a079 100644 --- a/src/view/main.phel +++ b/src/view/main.phel @@ -11,17 +11,6 @@ [:link {:rel "icon" :type "image/png" :href "./images/favicon-32.png"}] [:title "Lezer"]]) -(def- logo - [:div {:class "logo"} - [:img {:src "./images/logo.svg" :width "360"}]]) - -(def- links - [:div {:class "links"} - [:a {:href "https://phel-lang.org/"} "Homepage"] - [:a {:href "https://phel-lang.org/documentation/getting-started/"} "Getting started"] - [:a {:href "https://github.com/phel-lang/phel-lang"} "GitHub"] - [:a {:href "https://gitter.im/phel-lang/community"} "Community"]]) - (defn- authors-list [authors router] (raw-string (html [:span (let [a (first authors)] @@ -31,7 +20,7 @@ [:span ", " [:a {:href (r/generate router :author {:id (:id a)})} (:name a)]])]))) -(defn content [books router] +(defn index-html [books router] (html (doctype :html5) [:html @@ -65,6 +54,3 @@ [:label {:for "pages"} "# of pages: "] [:input {:type "number" :name "pages"}] [:input {:type "submit"}]]]]]])) - -(defn index-html [books router] - (content books router)) -- cgit v1.3-2-g0d8e