clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-29 23:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #6597 from logseq/fix/sync-start

Browse Source 
fix: remove tricky check for sync
This commit is contained in:
rcmerci
2022-09-05 11:22:58 +08:00
committed by GitHub
parent ce0a2e5944 86c18bd706
commit 7ec99104da
1 changed files with 12 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
src/main/frontend/fs/sync.cljs
View File

@@ -1544,14 +1544,15 @@
[type {:keys [dir path _content stat] :as _payload}]
(when-let [current-graph (state/get-current-repo)]
(when (string/ends-with? current-graph dir)
(when-not (sync-state--stopped? (state/get-file-sync-state current-graph))
(when (or (:mtime stat) (= type "unlink"))
(go
(let [path (remove-dir-prefix dir path)
files-meta (and (not= "unlink" type)
(<! (<get-local-files-meta rsapi "" dir [path])))
checksum (and (coll? files-meta) (some-> files-meta first :etag))]
(>! local-changes-chan (->FileChangeEvent type dir path stat checksum)))))))))
(let [sync-state (state/get-file-sync-state current-graph)]
(when (and sync-state (not (sync-state--stopped? sync-state)))
(when (or (:mtime stat) (= type "unlink"))
(go
(let [path (remove-dir-prefix dir path)
files-meta (and (not= "unlink" type)
(<! (<get-local-files-meta rsapi "" dir [path])))
checksum (and (coll? files-meta) (some-> files-meta first :etag))]
(>! local-changes-chan (->FileChangeEvent type dir path stat checksum))))))))))
(defn local-changes-revised-chan-builder
"return chan"
@@ -1975,9 +1976,10 @@
add-history? (update :history add-history-items paths now))))
(defn sync-state--stopped?
"Graph syncing is stopped or not enabled"
"Graph syncing is stopped"
[sync-state]
(or (nil? sync-state) (= ::stop (:state sync-state))))
{:pre [(s/valid? ::sync-state sync-state)]}
(= ::stop (:state sync-state)))
;;; ### remote->local syncer & local->remote syncer