clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-01 01:16:27 +00:00
Code Issues Packages Projects Releases Wiki Activity

refactor: create new pages

Browse Source
This commit is contained in:
Tienson Qin
2021-04-07 17:33:43 +08:00
parent 49bc64f5d0
commit 9e1b5beb9d
11 changed files with 166 additions and 231 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/main/frontend/format/block.cljs
View File

@@ -241,7 +241,7 @@
(assoc :repeated? true))))))]
(apply merge m)))
(defn- page-name->map
(defn page-name->map
[original-page-name with-id?]
(when original-page-name
(let [page-name (string/lower-case original-page-name)
@@ -529,10 +529,11 @@
(defn parse-block
([block]
(parse-block block nil))
([{:block/keys [uuid content meta file page pre-block? parent left format] :as block} {:keys [with-id?]
:or {with-id? true}}]
([{:block/keys [uuid content meta file page parent left format] :as block} {:keys [with-id?]
:or {with-id? true}}]
(when-not (string/blank? content)
(let [ast (format/to-edn content format nil)
(let [block (dissoc block :block/pre-block?)
ast (format/to-edn content format nil)
new-block (first (extract-blocks ast content with-id?))
parent-refs (->> (db/get-block-parent (state/get-current-repo) uuid)
:block/path-refs