fix: don't save collapsed property after parsing

This commit is contained in:
Tienson Qin
2022-05-24 00:49:30 +08:00
parent 6843271591
commit ce5f9965ed

View File

@@ -509,7 +509,9 @@
(seq (:properties-order properties))
(assoc :properties-order (:properties-order properties)))
block (if (get-in block [:properties :collapsed])
(assoc block :collapsed? true)
(-> (assoc block :collapsed? true)
(update :properties (fn [m] (dissoc m :collapsed)))
(update :properties-order (fn [keys] (vec (remove #{:collapsed} keys)))))
block)
block (assoc block
:content (get-block-content encoded-content block format pos-meta block-pattern))