Adapted viewer for new frames

This commit is contained in:
alonso.torres
2022-06-03 15:56:50 +02:00
parent 8c5cc446b0
commit c8ad379bf8
16 changed files with 148 additions and 115 deletions

View File

@@ -278,6 +278,11 @@
(rest frames))]
(or (:id top-frame) uuid/zero)))
(defn frame-by-position
[objects position]
(let [frame-id (frame-id-by-position objects position)]
(get objects frame-id)))
(declare indexed-shapes)
(defn get-base-shape