Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-13 16:21:57 -05:00
Code Issues Activity

🔥 Remove duplicate code

Browse source
This commit is contained in:
Andrey Antukh 2023-07-03 18:37:04 +02:00
parent fbf89d7f6c
commit 8dfebc39fe
1 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
common/src/app/common/pages/changes.cljc
View file

@ -249,9 +249,6 @@
;; Changes Processing Impl
(def valid-shape?
(sm/pred-fn ::cts/shape))
(defn validate-shapes!
[data-old data-new items]
(letfn [(validate-shape! [[page-id id]]
@ -262,7 +259,7 @@
(when (and (some? shape-new)
(not= shape-old shape-new))
(dm/verify! (and (cts/shape? shape-new)
(valid-shape? shape-new))))))]
(cts/valid-shape? shape-new))))))]
(->> (into #{} (map :page-id) items)
(mapcat (fn [page-id]