Skip to content

Instantly share code, notes, and snippets.

@pierrel
Created February 3, 2009 03:09
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save pierrel/57270 to your computer and use it in GitHub Desktop.
Save pierrel/57270 to your computer and use it in GitHub Desktop.
(def people-view
(html [:html
[:h1 "People"]
[:ul
(let [rows '({:id 1 :name "johanna"} {:id 2 :name "vincent"})]
(reduce html
(map (fn [hash] [:li (str (get hash :id) " - " (get hash :name))]) rows)))]]))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment