memory.clj

(ns second-post.memory
  (:use aleph))

(def db (atom []))

(defn save [request]
  (future
   (swap! db conj {:bar "test"})
   (respond! request
             {:status 200
              :headers {"Content-Type" "text/html"}
              :body "Saved!"})))

(run-aleph save {:port 8080})