Clojurians Log v2
Clojure programming
Channels
Apps
cljsrn
https://github.com/drapanjanas/re-natal | https://github.com/drapanjanas/re-natal/wiki/FAQ |
https://github.com/condense/mercury-app/wiki | https://github.com/seantempesta/expo-cljs-template/
https://www.npmjs.com/package/create-expo-cljs-app
zendevil 2021-03-08T14:51:51.090300Z
@joshmiller I got it working. Thanks
zendevil 2021-03-08T14:53:10.091300Z
I have a reframe handler like so:
(reg-event-fx
:upload-video
(fn [{:keys [db] :as cofx} [_ navigation]]
{:video->body [(:video-body db) (:video db)]
:thumbnail->body [(:video-body db) (:thumbnail db)]
:title->body [(:video-body db) (:title db)]
:address->body [(:video-body db) (:address db)]
:date->body [(:video-body db) (:date db)]
:db (assoc db :uploading-progress true
:upload-error false)
:http-xhrio {:method :post
:progress-handler #(dispatch [:upload-progress %])
:uri (str server-uri "/api/upload-video")
:body (:video-body db)
:on-success [:upload-success navigation]
:on-failure [:upload-error navigation]
:format (json-request-format)
:response-format (raw-response-format)}
}))