Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-10 17:00:36 -05:00
Code Issues Activity

♻️ Add more debugging traces

Browse source
This commit is contained in:
Andrés Moya 2020-11-19 11:59:20 +01:00
parent 2582766a89
commit 830d932eec
1 changed files with 13 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
frontend/src/app/main/data/workspace/libraries_helpers.cljs
View file

@ -560,7 +560,6 @@
; ---- Operation generation helpers ----
(defn- compare-children
[children-inst children-master only-inst-cb only-master-cb both-cb moved-cb inverse?]
(loop [children-inst (seq (or children-inst []))
@ -764,6 +763,9 @@
(defn- remove-shape
[shape container]
(log/info :msg (str "REMOVE-SHAPE "
(if (cph/page? container) "[P] " "[C] ")
(:name shape)))
(let [objects (get container :objects)
parents (cph/get-parents (:id shape) objects)
children (cph/get-children (:id shape) objects)
@ -801,6 +803,7 @@
(defn- move-shape
[shape index-before index-after container]
(log/info :msg (str "MOVE "
(if (cph/page? container) "[P] " "[C] ")
(:name shape)
" "
index-before
@ -824,6 +827,9 @@
(defn- remove-component-and-ref
[shape container]
(log/info :msg (str "REMOVE-COMPONENT-AND-REF "
(if (cph/page? container) "[P] " "[C] ")
(:name shape)))
[[(as-> {:type :mod-obj
:id (:id shape)
:operations [{:type :set
@ -865,6 +871,9 @@
(defn- remove-ref
[shape container]
(log/info :msg (str "REMOVE-REF "
(if (cph/page? container) "[P] " "[C] ")
(:name shape)))
[[(as-> {:type :mod-obj
:id (:id shape)
:operations [{:type :set
@ -888,6 +897,9 @@
(defn- reset-touched
[shape container]
(log/info :msg (str "RESET-TOUCHED "
(if (cph/page? container) "[P] " "[C] ")
(:name shape)))
[[(as-> {:type :mod-obj
:id (:id shape)
:operations [{:type :set-touched