clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-28 14:39:48 +00:00
Code Issues Packages Projects Releases Wiki Activity

enhance(rtc): add testcase

Browse Source
This commit is contained in:
rcmerci
2023-10-30 23:23:10 +08:00
parent c88b0a2a4e
commit dc44e672d4
1 changed files with 37 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
src/test/frontend/db/rtc_test.cljs
View File

@@ -2,10 +2,14 @@
(:require ["/frontend/idbkv" :as idb-keyval]
[cljs.core.async :as async :refer [<! go timeout]]
[clojure.test :as t :refer [deftest is use-fixtures]]
[datascript.core :as d]
[frontend.db.conn :as conn]
[frontend.db.rtc.fixture :as rtc-fixture]
[frontend.db.rtc.idb-keyval-mock :as idb-keyval-mock :include-macros true]
[frontend.db.rtc.op :as rtc-op]
[frontend.handler.page :as page-handler]
[frontend.modules.outliner.core :as outliner-core]
[frontend.modules.outliner.transaction :as outliner-tx]
[frontend.test.helper :as test-helper :include-macros true]
[spy.core :as spy]))
@@ -40,3 +44,36 @@
(is (= "update-page" (first (second (first ops))))))
(reset)
(done)))))
(deftest gen-local-ops-test-2--create-page&insert-blocks
(t/async
done
(idb-keyval-mock/with-reset-idb-keyval-mock reset
(go
(let [conn (conn/get-db test-helper/test-db false)]
(page-handler/create! "gen-local-ops-test-2--create-page&insert-blocks"
{:redirect? false :create-first-block? false})
(let [page-block (d/pull @conn '[*] [:block/name "gen-local-ops-test-2--create-page&insert-blocks"])
[block-uuid1 block-uuid2] (repeatedly random-uuid)]
(outliner-tx/transact!
{}
(outliner-core/insert-blocks! [{:block/uuid block-uuid1 :block/content "block1"}
{:block/uuid block-uuid2 :block/content "block2"
:block/left [:block/uuid block-uuid1]
:block/parent [:block/uuid (:block/uuid page-block)]}]
page-block
{:sibling? true :keep-uuid? true}))
(<! (timeout 500))
(let [{:keys [ops]} (<! (rtc-op/<get-ops&local-tx test-helper/test-db))
sorted-ops (sort-by first < ops)
ops* (map second ops)
[update-page-op move-op-1 update-op-1 move-op-2 update-op-2] ops*]
(is (= sorted-ops ops))
(is (= "update-page" (first update-page-op)))
(is (= ["move" {:block-uuids [(str block-uuid1)]}] move-op-1))
(is (= ["update" {:block-uuid (str block-uuid1) :updated-attrs {:content nil}}] update-op-1))
(is (= ["move" {:block-uuids [(str block-uuid2)]}] move-op-2))
(is (= ["update" {:block-uuid (str block-uuid2) :updated-attrs {:content nil}}] update-op-2)))))
(reset)
(done)))))