mirror of
https://github.com/penpot/penpot.git
synced 2026-02-12 14:42:56 +00:00
Clean up debugging code
This commit is contained in:
@@ -247,7 +247,7 @@ Token names should only contain letters and digits separated by . characters.")}
|
||||
final-description (assoc :description final-description)
|
||||
(:id token) (assoc :id (:id token)))]
|
||||
(st/emit! (dt/update-create-token new-token))
|
||||
(st/emit! (wtu/update-workspace-tokens-event))
|
||||
(st/emit! (wtu/update-workspace-tokens))
|
||||
(modal/hide!)))))))))]
|
||||
[:form
|
||||
{:on-submit on-submit}
|
||||
|
||||
@@ -117,11 +117,7 @@
|
||||
(actionize-shapes-update-info)))
|
||||
|
||||
(defn update-workspace-tokens []
|
||||
(let [resolved-tokens (wtsd/get-cached-tokens @refs/workspace-tokens)]
|
||||
(update-tokens resolved-tokens)))
|
||||
|
||||
(defn update-workspace-tokens-event []
|
||||
(ptk/reify ::update-shape-position
|
||||
(ptk/reify ::update-workspace-tokens
|
||||
ptk/WatchEvent
|
||||
(watch [_ state _]
|
||||
(->>
|
||||
@@ -135,14 +131,3 @@
|
||||
(->> (update-tokens sd-tokens)
|
||||
(rx/concat)))
|
||||
(rx/of (dwu/commit-undo-transaction undo-id))))))))))
|
||||
|
||||
(comment
|
||||
(->> (update-workspace-tokens)
|
||||
(map rest)
|
||||
(into []))
|
||||
|
||||
|
||||
(update-workspace-tokens)
|
||||
|
||||
(st/emit! (update-workspace-tokens-event))
|
||||
nil)
|
||||
|
||||
Reference in New Issue
Block a user