           [:body
            [:h1 "HTTP Async"]
            [:p [:a {:href "/system.html"} "System"]]
-           [:p [:a {:href "/channel.html"} "Channel"]]])})
+           [:p [:a {:href "/channel.html"} "Channel"]]
+           ])})
 
 (defn show-system []
   (fn [req]

             [:h2 "Channel"]
             [:p "Channel type: " (type ch)]
             [:p "Buffer type: " (.-buf ch)]
             [:p "Channel value: " (pr-str (.-buf (.-buf ch)))]])}))

;; Components are defined using defrecord.

(defrecord Website []
  Lifecycle
  (start [component]
    (let [ch (chan 10)]
      ;; Let's load the channel up with some random data
      (go (dotimes [_ 20] (>! ch (rand-int 20))))
      (assoc component :channel ch)))
  (stop [component] component)


(ns {{name}}.website
  (:require
   [clojure.core.async :refer (go >! <! buffer dropping-buffer sliding-buffer chan take!)]
   [clojure.pprint :refer (pprint)]
   [clojure.tools.logging :refer :all]
   [bidi.bidi :refer (path-for)]
