todos...

gistfile1.clj

(ns bare.core
  (:require
    [clojure.string :as s :refer [join]]
    [cljs.core.async :as async :refer [<! >! chan timeout put!]]
    [dommy.utils :as utils]
    [dommy.core :as dommy])
  (:use-macros
    [dommy.macros :only [node sel sel1 deftemplate]])
  (:require-macros [cljs.core.async.macros :as m :refer [go]]))

(def todos [{:title "dishes" :done false}
            {:title "cook" :done true}])

(deftemplate checkbox-tpl [bool-val]
  [:input
    {:type "checkbox" :ok "dokie"}])

(deftemplate todo-tpl [todo]
  [:li {:class (s/join " "
                       ["todo"
                        (if (= true (todo :done))
                          "done")])}
   (todo :title)
   (checkbox-tpl (todo :done))])

(deftemplate todos-tpl [todos]
  [:ul.todos-list
   (map todo-tpl todos)])

(deftemplate header-tpl []
  [:p "todos"])

(defn render [tpl]
  (let [app (sel1 :.todos-app)]
    (dommy/append! app tpl)))

(render (header-tpl))
(render (todos-tpl todos))