🎉 Drag and drop files in the dashboard

This commit is contained in:
Andrés Moya 2021-03-09 09:13:17 +01:00
parent 81a604dca2
commit c2332331ce
11 changed files with 332 additions and 81 deletions

View file

@ -30,7 +30,6 @@
[e]
(.-target e))
(defn classnames
[& params]
(assert (even? (count params)))
@ -233,6 +232,12 @@
{:pre [(blob? b)]}
(js/URL.createObjectURL b))
(defn set-property! [node property value]
(.setAttribute node property value))
(defn set-text! [node text]
(set! (.-textContent node) text))
(defn set-css-property [node property value]
(.setProperty (.-style ^js node) property value))