🎉 Color picker integration with library

This commit is contained in:
alonso.torres 2020-09-04 12:03:14 +02:00 committed by Andrey Antukh
parent 12a2b35b28
commit ab7fee50ea
9 changed files with 313 additions and 146 deletions

View file

@ -43,10 +43,6 @@
[v]
(into [] (gcolor/hexToHsv v)))
(defn hsv->hex
[[h s v]]
(gcolor/hsvToHex h s v))
(defn hex->rgba
[^string data ^number opacity]
(-> (hex->rgb data)
@ -60,13 +56,26 @@
[0 0 0]))))
(defn hsl->rgb
[h s l]
[[h s l]]
(gcolor/hslToRgb h s l))
(defn hsl->hex [h s l]
(defn hsl->hex
[[h s l]]
(gcolor/hslToHex h s l))
(defn hex?
[v]
(and (string? v)
(re-seq #"^#[0-9A-Fa-f]{6}$" v)))
(defn hsl->hsv
[[h s l]]
(gcolor/hslToHsv h s l))
(defn hsv->hex
[[h s v]]
(gcolor/hsvToHex h s v))
(defn hsv->hsl
[hsv]
(hex->hsl (hsv->hex hsv)))

View file

@ -206,3 +206,9 @@
(defn set-css-property [node property value]
(.setProperty (.-style node) property value))
(defn capture-pointer [event]
(-> event get-target (.setPointerCapture (.-pointerId event))))
(defn release-pointer [event]
(-> event get-target (.releasePointerCapture (.-pointerId event))))