fix: more outliner lints from new ns

This commit is contained in:
Gabriel Horner
2025-09-25 12:52:58 -04:00
committed by Tienson Qin
parent 82fee247c2
commit 27b624ddd4
2 changed files with 8 additions and 4 deletions

View File

@@ -6,3 +6,7 @@ logseq.outliner.datascript/transact!
logseq.outliner.op/apply-ops!
;; API fn
logseq.outliner.op/register-op-handlers!
;; API fn
logseq.outliner.page/delete!
;; API fn
logseq.outliner.page/create!

View File

@@ -19,7 +19,7 @@
[logseq.graph-parser.text :as text]
[logseq.outliner.validate :as outliner-validate]))
(defn db-refs->page
(defn- db-refs->page
"Replace [[page name]] with page name"
[page-entity]
(let [refs (:block/_refs page-entity)
@@ -129,7 +129,7 @@
(db-property-build/build-properties-with-ref-values property-vals-tx-m)))))))
;; TODO: Revisit title cleanup as this was copied from file implementation
(defn sanitize-title
(defn ^:api sanitize-title
[title]
(let [title (-> (string/trim title)
(text/page-ref-un-brackets!)
@@ -165,7 +165,7 @@
:block/parent (or parent (:db/id library))
:block/order (db-order/gen-key))))
(defn- split-namespace-pages
(defn- ^:large-vars/cleanup-todo split-namespace-pages
[db page date-formatter create-class?]
(let [{:block/keys [title] block-uuid :block/uuid} page]
(->>
@@ -228,7 +228,7 @@
[page])
(remove nil?))))
(defn create
(defn- ^:large-vars/cleanup-todo create
"Pure function without side effects"
[db title*
{uuid' :uuid