1_app.clj

;; wrappers
(defn wrap-connection [handler]
  (fn [request]
    (sql/with-connection config/dbspec
      (handler request))))

;; handlers
(defn get-profile [request]
  (let [params (:params request) id (params "id")]
    (profile/find-by-id id)))

;; combine it all: this would actually use moustache or some other routing
(def app
  (-> get-profile
      wrap-params
      wrap-db-connection))

;; start app
(run-jetty app {:port 8080})