From cf8de03a1acc5c60c7752f9cff875af6715a5d6b Mon Sep 17 00:00:00 2001 From: Nicholas Kariniemi Date: Wed, 24 Jul 2013 22:50:29 +0300 Subject: [PATCH] Display test grub list --- src-clj/grub/core.clj | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) diff --git a/src-clj/grub/core.clj b/src-clj/grub/core.clj index cd249f0..54df867 100644 --- a/src-clj/grub/core.clj +++ b/src-clj/grub/core.clj @@ -20,6 +20,17 @@ (send! channel {:status 200 :headers {"Content-Type" "text/plain"} :body "Long polling?"})))) +(def test-grubs + ["8 dl water" + "8 whole peppercorns" + "2 bay leaves" + "1 - 2 (150 g) onions" + "750 g potato" + "600 g salmon" + "1 t. salt" + "2 dl cream" + "1 dl dill"]) + (defn index-page [] (html5 [:head @@ -31,7 +42,11 @@ [:div.container [:div.row-fluid [:div.span8.offset2 - [:h3 "Grub"]]]] + [:h2 "Grub"] + [:table.table + [:tbody + (for [grub test-grubs] + [:tr [:td [:label.checkbox [:input {:type :checkbox} grub]]]])]]]]] (include-js "http://code.jquery.com/jquery.js") (include-js "/js/bootstrap.js") (include-js "/js/main.js")]))