3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-08-07 14:38:33 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Changes to the colorpicker to support gradients

Browse source
This commit is contained in:
alonso.torres 2020-10-08 16:08:00 +02:00
parent a7335533bb
commit 381aef77ee
10 changed files with 368 additions and 174 deletions
Download patch file Download diff file Expand all files Collapse all files

13
frontend/src/app/util/color.cljs
View file

@ -77,3 +77,16 @@
(defn hsv->hsl
[hsv]
(hex->hsl (hsv->hex hsv)))
(defn gradient->css [{:keys [type stops]}]
(let [parse-stop
(fn [{:keys [offset color opacity]}]
(let [[r g b] (hex->rgb color)]
(str/fmt "rgba(%s, %s, %s, %s) %s" r g b opacity (str (* offset 100) "%"))))
stops-css (str/join "," (map parse-stop stops))]
(if (= type :linear)
(str/fmt "linear-gradient(to bottom, %s)" stops-css)
(str/fmt "radial-gradient(circle, %s" stops-css))))