3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-13 12:26:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Render liner gradient fills

Browse source
This commit is contained in:
Belén Albeza 2024-11-28 15:50:04 +01:00
parent 8fa334265c
commit c8e322cd58
4 changed files with 116 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

21
frontend/src/app/render_wasm/api.cljs
View file

@ -92,14 +92,29 @@
[fills]
(h/call internal-module "_clear_shape_fills")
(run! (fn [fill]
(let [opacity (:fill-opacity fill)
color (:fill-color fill)]
(let [opacity (or (:fill-opacity fill) 1.0)
color (:fill-color fill)
gradient (:fill-color-gradient fill)]
(when ^boolean color
(let [rgb (js/parseInt (subs color 1) 16)
r (bit-shift-right rgb 16)
g (bit-and (bit-shift-right rgb 8) 255)
b (bit-and rgb 255)]
(h/call internal-module "_add_shape_solid_fill" r g b opacity)))))
(h/call internal-module "_add_shape_solid_fill" r g b opacity)))
(when (and (some? gradient) (= (:type gradient) :linear))
(h/call internal-module "_add_shape_linear_fill"
(:start-x gradient)
(:start-y gradient)
(:end-x gradient)
(:end-y gradient)
opacity)
(run! (fn [stop]
(let [rgb (js/parseInt (subs (:color stop) 1) 16)
r (bit-shift-right rgb 16)
g (bit-and (bit-shift-right rgb 8) 255)
b (bit-and rgb 255)
a (:opacity stop)]
(h/call internal-module "_add_shape_fill_stop" r g b a (:offset stop)))) (:stops gradient)))))
fills))
(defn- translate-blend-mode