🔧 Use id instead of name for tokens crud

This commit is contained in:
Andrés Moya
2025-07-02 09:11:40 +02:00
committed by Andrés Moya
parent 1c79e726af
commit 57330f53e2
15 changed files with 252 additions and 186 deletions

View File

@@ -39,15 +39,18 @@
:sets #{"test-token-set"}))
(ctob/set-active-themes #{"/test-theme"})
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "test-token-1"
(ctob/make-token :id (cthi/new-id! :test-token-1)
:name "test-token-1"
:type :border-radius
:value 25))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "test-token-2"
(ctob/make-token :id (cthi/new-id! :test-token-2)
:name "test-token-2"
:type :border-radius
:value 50))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "test-token-3"
(ctob/make-token :id (cthi/new-id! :test-token-3)
:name "test-token-3"
:type :border-radius
:value 75))))
(ctho/add-frame :frame1)
@@ -202,9 +205,9 @@
file (setup-file-with-copy)
store (ths/setup-store file)
;; ==== Action
;; ==== Action
events [(dwtl/set-selected-token-set-name "test-token-set")
(dwtl/update-token "test-token-1"
(dwtl/update-token (cthi/id :test-token-1)
{:name "test-token-1"
:type :border-radius
:value 66})]
@@ -323,27 +326,33 @@
:sets #{"test-token-set"}))
(ctob/set-active-themes #{"/test-theme"})
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-radius"
(ctob/make-token :id (cthi/new-id! :token-radius)
:name "token-radius"
:type :border-radius
:value 10))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-rotation"
(ctob/make-token :id (cthi/new-id! :token-rotation)
:name "token-rotation"
:type :rotation
:value 30))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-opacity"
(ctob/make-token :id (cthi/new-id! :token-opacity)
:name "token-opacity"
:type :opacity
:value 0.7))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-stroke-width"
(ctob/make-token :id (cthi/new-id! :token-stroke-width)
:name "token-stroke-width"
:type :stroke-width
:value 2))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-color"
(ctob/make-token :id (cthi/new-id! :token-color)
:name "token-color"
:type :color
:value "#00ff00"))
(ctob/add-token-in-set "test-token-set"
(ctob/make-token :name "token-dimensions"
(ctob/make-token :id (cthi/new-id! :token-dimensions)
:name "token-dimensions"
:type :dimensions
:value 100))))
(ctho/add-frame :frame1)
@@ -360,22 +369,22 @@
;; ==== Action
events [(dwtl/set-selected-token-set-name "test-token-set")
(dwtl/update-token "token-radius"
(dwtl/update-token (cthi/id :token-radius)
{:name "token-radius"
:value 30})
(dwtl/update-token "token-rotation"
(dwtl/update-token (cthi/id :token-rotation)
{:name "token-rotation"
:value 45})
(dwtl/update-token "token-opacity"
(dwtl/update-token (cthi/id :token-opacity)
{:name "token-opacity"
:value 0.9})
(dwtl/update-token "token-stroke-width"
(dwtl/update-token (cthi/id :token-stroke-width)
{:name "token-stroke-width"
:value 8})
(dwtl/update-token "token-color"
(dwtl/update-token (cthi/id :token-color)
{:name "token-color"
:value "#ff0000"})
(dwtl/update-token "token-dimensions"
(dwtl/update-token (cthi/id :token-dimensions)
{:name "token-dimensions"
:value 200})]