Clojurians Log v2

thanks @ddeaguiar . I managed to fix it now to:

(def list-delete
   {:name :list-delete
    :enter
    (fn [context]
      (let [nm (get-in context [:request :query-params :name]) 
            db (get-in context [:request :database])
            db-id (key (first (filter #(= (:name (val %)) nm) db)))
            new-map (dissoc db db-id) 
            url (route/url-for :list-view :params {:list-id db-id})]
        (assoc context
               :tx-data [dissoc db db-id]
               :response (accepted (str new-map))) 
         ))})

:thumbsup: