♻️ Refactor page options data structure

This commit is contained in:
Andrey Antukh 2024-09-03 11:59:33 +02:00 committed by Alonso Torres
parent 2dea0b52ed
commit 4ad4057878
41 changed files with 659 additions and 525 deletions

View file

@ -46,7 +46,6 @@
page' (cthf/current-page file')
guide' (-> page'
:options
:guides
(vals)
(first))]

View file

@ -391,9 +391,9 @@
(t/testing "Update global guide"
(let [guide {:position 50 :axis :x}
file (-> (fb/create-file "Test")
(fb/add-page {:name "Page 1"})
(fb/add-guide guide))
file (-> (fb/create-file "Test")
(fb/add-page {:name "Page 1"})
(fb/add-guide guide))
guide-id (:last-id file)
guide (assoc guide :id guide-id)
@ -403,7 +403,7 @@
frame-id (:last-id file)
page (fb/get-current-page file)
data (-> (sd/make-snap-data) (sd/add-page page))
data (-> (sd/make-snap-data) (sd/add-page page))
new-page (-> (fb/update-guide file (assoc guide :position 150))
(fb/get-current-page))