Persist sheet type properly from :put-sheet!

dhleong · Feb 6, 2019 · c52c087 · c52c087
1 parent 59cb26c
commit c52c087
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/cljs/wish/events.cljs b/src/cljs/wish/events.cljs
@@ -259,7 +259,11 @@
   [trim-v]
   (fn-traced [{:keys [db]} [sheet-id sheet]]
     {:db (-> db
-             (assoc-in [:sheets sheet-id] sheet)
+             (update-in [:sheets sheet-id]
+                        (fn [old-value]
+                          (merge
+                            (select-keys old-value [:type])
+                            sheet)))
              (reset-sheet-err sheet-id))
 
      ; NOTE: we're probably on a :sheet page, and we might not have