github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-12 23:19:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix typography token context menu (#7038)

Browse Source
This commit is contained in:
Eva Marco 2025-07-31 15:00:14 +02:00 committed by GitHub
parent 76d725559e
commit 63bfbbb3c6
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
frontend/src/app/main/ui/workspace/tokens/management/context_menu.cljs
View File

@ -267,6 +267,8 @@
(def shape-attribute-actions-map (def shape-attribute-actions-map
(let [stroke-width (partial generic-attribute-actions #{:stroke-width} "Stroke Width") (let [stroke-width (partial generic-attribute-actions #{:stroke-width} "Stroke Width")
font-size (partial generic-attribute-actions #{:font-size} "Font Size") font-size (partial generic-attribute-actions #{:font-size} "Font Size")
letter-spacing (partial generic-attribute-actions #{:letter-spacing} "Letter Spacing")
font-family (partial generic-attribute-actions #{:font-family} "Font Family")
line-height #(generic-attribute-actions #{:line-height} "Line Height" (assoc % :on-update-shape dwta/update-line-height)) line-height #(generic-attribute-actions #{:line-height} "Line Height" (assoc % :on-update-shape dwta/update-line-height))
text-case (partial generic-attribute-actions #{:text-case} "Text Case") text-case (partial generic-attribute-actions #{:text-case} "Text Case")
border-radius (partial all-or-separate-actions {:attribute-labels {:r1 "Top Left" border-radius (partial all-or-separate-actions {:attribute-labels {:r1 "Top Left"
@ -292,6 +294,9 @@
(when (seq line-height) line-height)))) (when (seq line-height) line-height))))
:stroke-width stroke-width :stroke-width stroke-width
:font-size font-size :font-size font-size
:font-family font-family
:line-height line-height
:letter-spacing letter-spacing
:text-case text-case :text-case text-case
:dimensions (fn [context-data] :dimensions (fn [context-data]
(-> (concat (-> (concat