                  {::email (:email wallet)}))))
 
   :handle-created (fn [ctx]
-                   (log/info "CREATED")
                    (lr/ring-response
                     (cond-> (r/redirect (routes/absolute-path :account :email (::email ctx)))
                       (::cookie-data ctx) (assoc-in [:session :cookie-data] (::cookie-data ctx))

           content-types)
     [false {:message "Unsupported Content-Type"}])
    true))


(def content-types ["text/html" "application/x-www-form-urlencoded"])


                          ctx))
                      [false (fh/form-problem problems)])))

  :handle-unprocessable-entity (fn [ctx] 
                                 (lr/ring-response (fh/flash-form-problem
                                                    (r/redirect (routes/absolute-path :sign-in))
                                                    ctx)))
  :post! (fn [ctx]
           (let [data (-> ctx :request :params)
                 email (get data :email)]
             ;; TODO add actions if db or email failed
