(set! (.-onload image) (fn [] )) not working
问题 I have the following code which takes as input some images and then compresses them using the compress-omg function, which takes a data-url of each image inputted in sequence and stores the compressed blobs in a db vector :images (defn image-selector [] [:<> ;; appending image in this div [:div {:id "test-div"}] [:input {:type "file" :multiple true :id "input-image" :on-change (fn [e] (let [files (array-seq (.. e -target -files))] (doseq [file files] ;; must create a new file-reader in each