pull/2326/head
Tienson Qin 2021-06-29 10:58:14 +08:00
parent d16506728d
commit 4c9b29e02d
1 changed files with 4 additions and 2 deletions

View File

@ -115,7 +115,7 @@
(remove string/blank?))]
(swap! ref-tags set/union (set tags))
(map (fn [tag] {:block/name (string/lower-case tag)
:block/original-name tag})
:block/original-name tag})
tags)))))
pages (->> (concat
[page-entity]
@ -153,7 +153,9 @@
properties (let [properties (and (property/properties-ast? first-block)
(->> (last first-block)
(map (fn [[x y]]
[x (property/parse-property x y)]))
[x (if (string? y)
(property/parse-property x y)
y)]))
(into {})
(walk/keywordize-keys)))]
(when (and properties (seq properties))