0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-31 19:39:07 -05:00

Add set name to tokens panel list

This commit is contained in:
Juanfran 2025-01-15 08:22:42 +01:00
parent aa9f5fc18f
commit ccbb233866
2 changed files with 6 additions and 2 deletions

View file

@ -310,7 +310,7 @@
[:ul {:class (stl/css :token-context-submenu) [:ul {:class (stl/css :token-context-submenu)
:data-direction submenu-direction :data-direction submenu-direction
:ref submenu-ref :ref submenu-ref
;; Under review: This distances are arbitrary, ;; Under review: This distances are arbitrary,
;; https://tree.taiga.io/project/penpot/task/9627 ;; https://tree.taiga.io/project/penpot/task/9627
:style {:display "none" :style {:display "none"
:--dist (if (= submenu-direction "down") :--dist (if (= submenu-direction "down")

View file

@ -8,6 +8,7 @@
(:require-macros [app.main.style :as stl]) (:require-macros [app.main.style :as stl])
(:require (:require
[app.common.data :as d] [app.common.data :as d]
[app.common.data.macros :as dm]
[app.common.types.tokens-lib :as ctob] [app.common.types.tokens-lib :as ctob]
[app.main.data.modal :as modal] [app.main.data.modal :as modal]
[app.main.data.notifications :as ntf] [app.main.data.notifications :as ntf]
@ -243,13 +244,16 @@
selected-token-set-tokens (mf/deref refs/workspace-selected-token-set-tokens) selected-token-set-tokens (mf/deref refs/workspace-selected-token-set-tokens)
selected-token-set-path (mf/deref refs/workspace-selected-token-set-path)
token-groups (mf/with-memo [tokens selected-token-set-tokens] token-groups (mf/with-memo [tokens selected-token-set-tokens]
(-> (select-keys tokens (keys selected-token-set-tokens)) (-> (select-keys tokens (keys selected-token-set-tokens))
(sorted-token-groups)))] (sorted-token-groups)))]
[:* [:*
[:& token-context-menu] [:& token-context-menu]
[:& title-bar {:all-clickable true [:& title-bar {:all-clickable true
:title "TOKENS"}] :title (dm/str "TOKENS - " (ctob/set-path->set-name selected-token-set-path))}]
(for [{:keys [token-key token-type-props tokens]} (concat (:filled token-groups) (for [{:keys [token-key token-type-props tokens]} (concat (:filled token-groups)
(:empty token-groups))] (:empty token-groups))]
[:& token-component {:key token-key [:& token-component {:key token-key