mirror of
https://github.com/penpot/penpot.git
synced 2025-07-13 14:27:16 +02:00
🐛 Fix empty fills
This commit is contained in:
parent
34bbce5089
commit
c97314ddb5
1 changed files with 2 additions and 1 deletions
|
@ -245,7 +245,8 @@
|
||||||
|
|
||||||
(defn set-shape-fills
|
(defn set-shape-fills
|
||||||
[shape-id fills]
|
[shape-id fills]
|
||||||
(when (not-empty? fills)
|
(if (empty? fills)
|
||||||
|
(h/call wasm/internal-module "_clear_shape_fills")
|
||||||
(let [fills (take types.fill/MAX-FILLS fills)
|
(let [fills (take types.fill/MAX-FILLS fills)
|
||||||
image-fills (filter :fill-image fills)
|
image-fills (filter :fill-image fills)
|
||||||
offset (mem/alloc-bytes (* (count fills) sr-fills/FILL-BYTE-SIZE))
|
offset (mem/alloc-bytes (* (count fills) sr-fills/FILL-BYTE-SIZE))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue