fix: tests

This commit is contained in:
Tienson Qin
2025-10-15 17:25:46 +08:00
parent 6b12299520
commit 8d0c2f9887
4 changed files with 27 additions and 23 deletions

View File

@@ -33,8 +33,10 @@
["class1" "class2"]))
(set (map :block/title (model/get-all-classes repo)))))))
;; TODO: Async test
(deftest ^:fix-me get-class-objects-test
(let [opts {:redirect? false}
(let [opts {:class? true
:redirect? false}
_ (test-helper/create-page! "class1" opts)
class (db/get-case-page "class1")
_ (test-helper/save-block! repo fbid "Block 1" {:tags ["class1"]})]

View File

@@ -6,7 +6,7 @@
[frontend.config :as config]
[frontend.db :as db]
[frontend.db.conn :as conn]
[frontend.handler.db-based.page :as db-page-handler]
[frontend.handler.db-based.property :as db-property-handler]
[frontend.handler.editor :as editor-handler]
[frontend.handler.file-based.repo :as file-repo-handler]
[frontend.handler.file-based.status :as status]
@@ -189,7 +189,9 @@ This can be called in synchronous contexts as no async fns should be invoked"
[;; page
{:block/uuid page-uuid
:block/name "test"
:block/title "Test"}
:block/title "Test"
;; :block/tags #{:logseq.class/Page}
}
;; first block
{:block/uuid first-block-uuid
:block/page page-id
@@ -240,7 +242,8 @@ This can be called in synchronous contexts as no async fns should be invoked"
[repo block-uuid content {:keys [tags]}]
(editor-handler/save-block! repo block-uuid content)
(doseq [tag tags]
(db-page-handler/add-tag repo block-uuid (db/get-page tag))))
(db-property-handler/set-block-property! block-uuid :block/tags
(db/get-page tag))))
(defn create-page!
[title & {:as opts}]