diff --git a/common/src/app/common/file_builder.cljc b/common/src/app/common/file_builder.cljc index f8faff235..9903d0f9f 100644 --- a/common/src/app/common/file_builder.cljc +++ b/common/src/app/common/file_builder.cljc @@ -341,13 +341,15 @@ :else (let [objects (lookup-objects file) + bool-content (gsh/calc-bool-content bool objects) bool' (gsh/update-bool-selrect bool children objects)] (commit-change file {:type :mod-obj :id bool-id :operations - [{:type :set :attr :selrect :val (:selrect bool') :ignore-touched true} + [{:type :set :attr :bool-content :val bool-content :ignore-touched true} + {:type :set :attr :selrect :val (:selrect bool') :ignore-touched true} {:type :set :attr :points :val (:points bool') :ignore-touched true} {:type :set :attr :x :val (-> bool' :selrect :x) :ignore-touched true} {:type :set :attr :y :val (-> bool' :selrect :y) :ignore-touched true}