3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-07 03:31:38 +02:00
Code Issues Projects Releases Packages Wiki Activity

🔧 A little cleanup

Browse source
This commit is contained in:
Andrés Moya 2024-12-13 13:12:21 +01:00
parent d453b584ee
commit d70b101aa1
2 changed files with 2 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

5
common/test/common_tests/types/tokens_lib_test.cljc
View file

@ -258,11 +258,10 @@
(ctob/delete-set-path "S-not-existing-set")) (ctob/delete-set-path "S-not-existing-set"))
token-set' (ctob/get-set tokens-lib' "updated-name") token-set' (ctob/get-set tokens-lib' "updated-name")
;;token-theme' (ctob/get-theme tokens-lib' "" "test-token-theme") token-theme' (ctob/get-theme tokens-lib' "" "test-token-theme")]
]
(t/is (= (ctob/set-count tokens-lib') 0)) (t/is (= (ctob/set-count tokens-lib') 0))
;; (t/is (= (:sets token-theme') #{})) TODO: fix this (t/is (= (:sets token-theme') #{}))
(t/is (nil? token-set')))) (t/is (nil? token-set'))))
(t/deftest active-themes-set-names (t/deftest active-themes-set-names

8
frontend/src/app/main/data/tokens.cljs
View file

@ -68,14 +68,6 @@
(->> (ctob/set-name-string->prefixed-set-path-string token-set-name) (->> (ctob/set-name-string->prefixed-set-path-string token-set-name)
(wtts/assoc-selected-token-set-path state))))) (wtts/assoc-selected-token-set-path state)))))
(defn set-selected-token-set-id-from-name
[token-set-name]
(ptk/reify ::set-selected-token-set-id-from-name
ptk/UpdateEvent
(update [_ state]
(->> (ctob/set-name->set-path-string token-set-name)
(wtts/assoc-selected-token-set-path state)))))
(defn create-token-theme [token-theme] (defn create-token-theme [token-theme]
(let [new-token-theme token-theme] (let [new-token-theme token-theme]
(ptk/reify ::create-token-theme (ptk/reify ::create-token-theme