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

💄 Minor cosmetic change on frame memo equals func.

Browse source
This commit is contained in:
Andrey Antukh 2020-04-10 14:31:24 +02:00 • committed by Alonso Torres
parent 7db2db96e1
commit d007bdf813
1 changed files with 17 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

38
frontend/src/uxbox/main/ui/shapes/frame.cljs
View file

@ -31,32 +31,28 @@
(declare frame-shape)
(declare translate-to-frame)
(defn wrap-memo-frame
([component]
(mf/memo'
component
(fn [np op]
(let [n-shape (aget np "shape")
o-shape (aget op "shape")
n-objs (aget np "objects")
o-objs (aget op "objects")
ids (:shapes n-shape)]
(and (identical? n-shape o-shape)
(loop [id (first ids)
ids (rest ids)]
(if (nil? id)
true
(if (identical? (get n-objs id)
(get o-objs id))
(recur (first ids) (rest ids))
false)))))))))
(defn frame-wrapper-memo-equals?
[np op]
(let [n-shape (aget np "shape")
o-shape (aget op "shape")
n-objs (aget np "objects")
o-objs (aget op "objects")
ids (:shapes n-shape)]
(and (identical? n-shape o-shape)
(loop [id (first ids)
ids (rest ids)]
(if (nil? id)
true
(if (identical? (get n-objs id)
(get o-objs id))
(recur (first ids) (rest ids))
false))))))
(defn frame-wrapper
[shape-wrapper]
(mf/fnc frame-wrapper
{::mf/wrap [wrap-memo-frame]}
{::mf/wrap [#(mf/memo' % frame-wrapper-memo-equals?)]}
[{:keys [shape objects] :as props}]
(let [selected-iref (-> (mf/deps (:id shape))
(mf/use-memo #(refs/make-selected (:id shape))))