|
|
@@ -79,7 +79,7 @@
|
|
|
first-elem-type (first (ffirst ast))
|
|
|
block-with-title? (mldoc/block-with-title? first-elem-type)
|
|
|
content' (str (config/get-block-pattern :markdown) (if block-with-title? " " "\n") content)
|
|
|
- block (block/parse-block (assoc block :block/content content'))]
|
|
|
+ block (merge block (block/parse-block (assoc block :block/content content')))]
|
|
|
(update block :block/refs remove-non-existed-refs!)))
|
|
|
block (if (and left (not= (:block/left block) left)) (assoc block :block/left left) block)
|
|
|
result (-> block
|