fix: revert change of parse-title-and-body

This commit is contained in:
Peng Xiao
2022-09-28 11:36:11 +08:00
parent b5663180ae
commit b3ecf26b90
2 changed files with 3 additions and 7 deletions

View File

@@ -97,14 +97,14 @@ and handles unexpected failure."
(let [ast (->> (format/to-edn content format (gp-mldoc/default-config format))
(map first))
title (when (gp-block/heading-block? (first ast))
(second (first ast)))
(:title (second (first ast))))
_ (println title (second (first ast)))
body (vec (if title (rest ast) ast))
body (drop-while gp-property/properties-ast? body)
result (cond->
(if (seq body) {:block/body body} {})
title
(assoc :block/title (:title title)
:block/heading-level (:size title)))]
(assoc :block/title title))]
(state/add-block-ast-cache! block-uuid content result)
result))))))