Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-08 16:18:11 -05:00
Code Issues Activity

Minor cosmetic changes on tests.

Browse source
This commit is contained in:
Andrey Antukh 2017-03-10 12:20:15 +01:00
parent 5693ec0142
commit cc0b61f122
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
1 changed files with 50 additions and 45 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

95
frontend/test/uxbox/tests/test_main_data_shapes_impl.cljs
View file

@ -125,6 +125,8 @@
3 {:id 3 :page 1}}}
expected (assoc-in initial [:pages 1 :shapes] [1 3 2])
result (impl/drop-shape initial 3 1 :after)]
;; (pprint expected)
;; (pprint result)
(t/is (= result expected))
(t/is (vector? (get-in result [:pages 1 :shapes])))))
@ -286,9 +288,11 @@
4 {:id 4 :page 1}}}
shape (get-in initial [:shapes 4])
expected (-> initial
(assoc-in [:pages 1 :shapes] [1 3])
(update-in [:shapes] dissoc 4))
expected {:pages {1 {:id 1 :shapes [1 3]}}
:shapes {1 {:id 1 :page 1 :type :group :items [2]}
2 {:id 2 :page 1 :group 1}
3 {:id 3 :page 1}}}
result (impl/dissoc-shape initial shape)]
;; (pprint expected)
;; (pprint result)
@ -304,39 +308,38 @@
3 {:id 3 :page 1}
4 {:id 4 :page 1}}}
shape (get-in initial [:shapes 2])
expected (-> initial
(assoc-in [:pages 1 :shapes] [3 4])
(update-in [:shapes] dissoc 2)
(update-in [:shapes] dissoc 1))
expected {:pages {1 {:id 1 :shapes [3 4]}}
:shapes {3 {:id 3 :page 1}
4 {:id 4 :page 1}}}
result (impl/dissoc-shape initial shape)]
;; (pprint expected)
;; (pprint result)
(t/is (= result expected))))
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; ;; Group Shapes
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Group Shapes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; group a shape
(t/deftest group-shapes-1
(let [initial {:pages {1 {:id 1 :shapes [1 2 3]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1}
3 {:id 3 :page 1}}}
expected (-> initial
(assoc-in [:workspace :selected] #{4})
(assoc-in [:pages 1 :shapes] [1 4 3])
(assoc-in [:shapes 2 :group] 4)
(assoc-in [:shapes 4] {:type :group :name "Group-1"
:items [2] :id 4 :page 1}))]
expected {:pages {1 {:id 1 :shapes [1 4 3]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1 :group 4}
3 {:id 3 :page 1}
4 {:type :group :name "Group-1" :items [2] :id 4 :page 1}}
:workspace {:selected #{4}}}]
(with-redefs [uxbox.util.uuid/random (constantly 4)]
(let [result (impl/group-shapes initial [2] 1)]
;; (pprint expected)
;; (pprint result)
(t/is (= result expected))))))
;; group two shapes
(t/deftest group-shapes-2
@ -345,34 +348,32 @@
2 {:id 2 :page 1}
3 {:id 3 :page 1}}}
expected (-> initial
(assoc-in [:workspace :selected] #{4})
(assoc-in [:pages 1 :shapes] [1 4])
(assoc-in [:shapes 2 :group] 4)
(assoc-in [:shapes 3 :group] 4)
(assoc-in [:shapes 4] {:type :group :name "Group-1"
:items [2 3] :id 4 :page 1}))]
expected {:pages {1 {:id 1 :shapes [1 4]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1 :group 4}
3 {:id 3 :page 1 :group 4}
4 {:type :group :name "Group-1" :items [2 3] :id 4 :page 1}}
:workspace {:selected #{4}}}]
(with-redefs [uxbox.util.uuid/random (constantly 4)]
(let [result (impl/group-shapes initial [2 3] 1)]
;; (pprint expected)
;; (pprint result)
(t/is (= result expected))))))
;; group group
(t/deftest group-shapes-3
(let [initial {:pages {1 {:id 1 :shapes [1 2 3]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1}
3 {:id 3 :page 1 :type :group}}}
expected (-> initial
(assoc-in [:workspace :selected] #{4})
(assoc-in [:pages 1 :shapes] [1 4])
(assoc-in [:shapes 2 :group] 4)
(assoc-in [:shapes 3 :group] 4)
(assoc-in [:shapes 4] {:type :group :name "Group-1"
:items [2 3] :id 4 :page 1}))]
expected {:pages {1 {:id 1 :shapes [1 4]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1 :group 4}
3 {:id 3 :page 1 :type :group :group 4}
4 {:type :group :name "Group-1" :items [2 3] :id 4 :page 1}}
:workspace {:selected #{4}}}]
(with-redefs [uxbox.util.uuid/random (constantly 4)]
(let [result (impl/group-shapes initial [2 3] 1)]
;; (pprint expected)
@ -387,13 +388,17 @@
2 {:id 2 :page 1 :group 3}
3 {:id 3 :page 1 :type :group}}}
expected (-> initial
(assoc-in [:workspace :selected] #{4})
(assoc-in [:pages 1 :shapes] [1 3])
(assoc-in [:shapes 2 :group] 4)
(assoc-in [:shapes 3 :items] [4])
(assoc-in [:shapes 4] {:type :group :name "Group-1"
:items [2] :id 4 :page 1 :group 3}))]
expected {:pages {1 {:id 1 :shapes [1 3]}}
:shapes {1 {:id 1 :page 1}
2 {:id 2 :page 1 :group 4}
3 {:id 3 :page 1 :type :group :items [4]}
4 {:type :group
:name "Group-1"
:items [2]
:id 4
:page 1
:group 3}}
:workspace {:selected #{4}}}]
(with-redefs [uxbox.util.uuid/random (constantly 4)]
(let [result (impl/group-shapes initial [2] 1)]
;; (pprint expected)
@ -505,9 +510,9 @@
2 {:id 2 :page 1 :type :group :items [3] :group 1}
3 {:id 3 :page 1 :group 2}}}
expected {:pages {1 {:id 1, :shapes [1]}},
:shapes {1 {:id 1, :page 1, :type :group, :items [3]},
3 {:id 3, :page 1, :group 1}},
expected {:pages {1 {:id 1 :shapes [1]}}
:shapes {1 {:id 1 :page 1 :type :group :items [3]}
3 {:id 3 :page 1 :group 1}}
:workspace {:selected #{3}}}]
(let [result (impl/degroup-shapes initial [2] 1)]
;; (pprint expected)
@ -523,8 +528,8 @@
3 {:id 3 :page 1 :group 1}
4 {:id 4 :page 1 :group 2}}}
expected {:pages {1 {:id 1, :shapes [3 4]}},
:shapes {3 {:id 3, :page 1}, 4 {:id 4, :page 1}},
expected {:pages {1 {:id 1 :shapes [3 4]}}
:shapes {3 {:id 3 :page 1} 4 {:id 4 :page 1}}
:workspace {:selected #{4 3}}}]
(let [result (impl/degroup-shapes initial [1 2] 1)]
;; (pprint expected)