mirror of https://github.com/logseq/logseq
Merge branch 'feat/db' of https://github.com/logseq/logseq into feat/db
commit
948a863eaa
|
@ -337,7 +337,7 @@
|
||||||
(test-helper/destroy-test-db!))
|
(test-helper/destroy-test-db!))
|
||||||
|
|
||||||
|
|
||||||
(deftest apply-remote-update-page-ops-test
|
(deftest apply-remote-update&remove-page-ops-test
|
||||||
(state/set-current-repo! test-helper/test-db)
|
(state/set-current-repo! test-helper/test-db)
|
||||||
(test-helper/reset-test-db!)
|
(test-helper/reset-test-db!)
|
||||||
(let [conn (conn/get-db test-helper/test-db false)
|
(let [conn (conn/get-db test-helper/test-db false)
|
||||||
|
@ -356,7 +356,33 @@
|
||||||
(#'rtc-core/affected-blocks->diff-type-ops repo (:affected-blocks data-from-ws))))]
|
(#'rtc-core/affected-blocks->diff-type-ops repo (:affected-blocks data-from-ws))))]
|
||||||
(is (rtc-const/data-from-ws-validator data-from-ws))
|
(is (rtc-const/data-from-ws-validator data-from-ws))
|
||||||
(rtc-core/apply-remote-update-page-ops repo conn date-formatter update-page-ops)
|
(rtc-core/apply-remote-update-page-ops repo conn date-formatter update-page-ops)
|
||||||
(is (= page1-uuid (:block/uuid (d/entity @conn [:block/uuid page1-uuid])))))))
|
(is (= page1-uuid (:block/uuid (d/entity @conn [:block/uuid page1-uuid]))))))
|
||||||
|
|
||||||
|
(testing "apply-remote-update-page-ops-test2"
|
||||||
|
(let [data-from-ws {:req-id "req-id" :t 1 :t-before 0
|
||||||
|
:affected-blocks
|
||||||
|
{page1-uuid {:op :update-page
|
||||||
|
:self page1-uuid
|
||||||
|
:page-name (str page1-uuid "-rename")
|
||||||
|
:original-name (str page1-uuid "-rename")}}}
|
||||||
|
update-page-ops (vals
|
||||||
|
(:update-page-ops-map
|
||||||
|
(#'rtc-core/affected-blocks->diff-type-ops repo (:affected-blocks data-from-ws))))]
|
||||||
|
(is (rtc-const/data-from-ws-validator data-from-ws))
|
||||||
|
(rtc-core/apply-remote-update-page-ops repo conn date-formatter update-page-ops)
|
||||||
|
(is (= (str page1-uuid "-rename") (:block/name (d/entity @conn [:block/uuid page1-uuid]))))))
|
||||||
|
|
||||||
|
(testing "apply-remote-remove-page-ops-test1"
|
||||||
|
(let [data-from-ws {:req-id "req-id" :t 1 :t-before 0
|
||||||
|
:affected-blocks
|
||||||
|
{page1-uuid {:op :remove-page
|
||||||
|
:block-uuid page1-uuid}}}
|
||||||
|
remove-page-ops (vals
|
||||||
|
(:remove-page-ops-map
|
||||||
|
(#'rtc-core/affected-blocks->diff-type-ops repo (:affected-blocks data-from-ws))))]
|
||||||
|
(is (rtc-const/data-from-ws-validator data-from-ws))
|
||||||
|
(rtc-core/apply-remote-remove-page-ops repo conn remove-page-ops)
|
||||||
|
(is (nil? (d/entity @conn [:block/uuid page1-uuid]))))))
|
||||||
|
|
||||||
(state/set-current-repo! nil)
|
(state/set-current-repo! nil)
|
||||||
(test-helper/destroy-test-db!))
|
(test-helper/destroy-test-db!))
|
||||||
|
|
Loading…
Reference in New Issue