3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-08-03 21:48:29 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Add function to validate shape referential integrity

Browse source
This commit is contained in:
Andrés Moya 2023-08-17 11:06:19 +02:00
parent 2ca28721f7
commit 730df04970
4 changed files with 348 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

8
common/test/common_tests/helpers/components.cljc
View file

@ -18,20 +18,20 @@
[shape]
(t/is (some? (:shape-ref shape)))
(t/is (some? (:component-id shape)))
(t/is (= (:component-root? shape) true)))
(t/is (= (:component-root shape) true)))
(defn check-instance-subroot
[shape]
(t/is (some? (:shape-ref shape)))
(t/is (some? (:component-id shape)))
(t/is (nil? (:component-root? shape))))
(t/is (nil? (:component-root shape))))
(defn check-instance-child
[shape]
(t/is (some? (:shape-ref shape)))
(t/is (nil? (:component-id shape)))
(t/is (nil? (:component-file shape)))
(t/is (nil? (:component-root? shape))))
(t/is (nil? (:component-root shape))))
(defn check-instance-inner
[shape]
@ -44,7 +44,7 @@
(t/is (nil? (:shape-ref shape)))
(t/is (nil? (:component-id shape)))
(t/is (nil? (:component-file shape)))
(t/is (nil? (:component-root? shape)))
(t/is (nil? (:component-root shape)))
(t/is (nil? (:remote-synced? shape)))
(t/is (nil? (:touched shape))))