mirror of
https://github.com/penpot/penpot.git
synced 2025-06-02 22:21:39 +02:00
Add token set deletion
This commit is contained in:
parent
ae39586d8c
commit
9329513949
4 changed files with 28 additions and 5 deletions
|
@ -116,6 +116,16 @@
|
|||
(rx/of
|
||||
(dch/commit-changes changes)))))))
|
||||
|
||||
(defn delete-token-set [token-set-id]
|
||||
(ptk/reify ::delete-token-set
|
||||
ptk/WatchEvent
|
||||
(watch [it state _]
|
||||
(let [data (get state :workspace-data)
|
||||
changes (-> (pcb/empty-changes it)
|
||||
(pcb/with-library-data data)
|
||||
(pcb/delete-token-set token-set-id))]
|
||||
(rx/of (dch/commit-changes changes))))))
|
||||
|
||||
(defn update-create-token
|
||||
[token]
|
||||
(let [token (update token :id #(or % (uuid/next)))]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue