clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-02-01 22:47:36 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: graph-parser tests

Browse Source
This commit is contained in:
Tienson Qin
2024-09-25 02:12:45 +08:00
parent fb2cc14444
commit 0641490fc8
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
deps/graph-parser/.carve/ignore vendored
View File

@@ -20,5 +20,6 @@ logseq.graph-parser.block/extract-plain
logseq.graph-parser.block/extract-refs-from-text
;; API
logseq.graph-parser.text/get-page-name
logseq.graph-parser.text/get-namespace-last-part
;; API
logseq.graph-parser.whiteboard/shape->block

11
deps/graph-parser/src/logseq/graph_parser/block.cljs vendored
View File

@@ -388,11 +388,10 @@
(let [type (if class? "class" (or (:block/type page) "page"))]
(assoc page :block/type type))))))
(defn- db-invalid-namespace-page?
"Namespace page neither exists nor journal"
[db db-based? page]
(defn- db-namespace-page?
"Namespace page that're not journal pages"
[db-based? page]
(and db-based?
(not (ldb/get-page db page))
(text/namespace-page? page)
(not (common-date/valid-journal-title-with-slash? page))))
@@ -411,12 +410,12 @@
(= (first form) "Custom")
(= (second form) "query"))
(when-let [page (get-page-reference form (:format block))]
(when-let [page' (when-not (db-invalid-namespace-page? db db-based? page)
(when-let [page' (when-not (db-namespace-page? db-based? page)
page)]
(swap! *refs conj page')))
(when-let [tag (get-tag form)]
(let [tag (text/page-ref-un-brackets! tag)]
(when-let [tag' (when-not (db-invalid-namespace-page? db db-based? tag)
(when-let [tag' (when-not (db-namespace-page? db-based? tag)
tag)]
(when (common-util/tag-valid? tag')
(swap! *refs conj tag')