mirror of
https://github.com/penpot/penpot.git
synced 2026-08-01 19:06:18 +00:00
Merge pull request #1677 from penpot/fix-select-color-for-stroke-from-palette
🐛 Fixing select color for stroke from palette
This commit is contained in:
commit
5709d2e757
@ -263,7 +263,17 @@
|
|||||||
attrs (merge attrs color-attrs)]
|
attrs (merge attrs color-attrs)]
|
||||||
|
|
||||||
(rx/of (dch/update-shapes ids (fn [shape]
|
(rx/of (dch/update-shapes ids (fn [shape]
|
||||||
(assoc-in shape [:strokes index] (merge (get-in shape [:strokes index]) attrs)))))))))
|
(let [new-attrs (merge (get-in shape [:strokes index]) attrs)
|
||||||
|
new-attrs (cond-> new-attrs
|
||||||
|
(not (contains? new-attrs :stroke-width))
|
||||||
|
(assoc :stroke-width 1)
|
||||||
|
|
||||||
|
(not (contains? new-attrs :stroke-style))
|
||||||
|
(assoc :stroke-style :solid)
|
||||||
|
|
||||||
|
(not (contains? new-attrs :stroke-alignment))
|
||||||
|
(assoc :stroke-alignment :center))]
|
||||||
|
(assoc-in shape [:strokes index] new-attrs)))))))))
|
||||||
|
|
||||||
(defn add-stroke
|
(defn add-stroke
|
||||||
[ids stroke]
|
[ids stroke]
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user