chore: remove redundant doall

pull/886/head
Yukun Guo 2020-12-09 23:23:14 +08:00 committed by Tienson Qin
parent 06d32ef2b0
commit 8963e23766
1 changed files with 5 additions and 6 deletions

View File

@ -206,11 +206,10 @@
git-add-f (fn []
(let [add-helper
(fn []
(doall
(map
(fn [[path content]]
(git-handler/git-add repo path update-status?))
files)))]
(map
(fn [[path content]]
(git-handler/git-add repo path update-status?))
files))]
(-> (p/all (add-helper))
(p/then (fn [_]
(when git-add-cb
@ -224,7 +223,7 @@
(let [original-content (get file->content path)]
[path original-content content])) files)]
(history/add-history! repo files-tx))))]
(-> (p/all (doall (map write-file-f files)))
(-> (p/all (map write-file-f files))
(p/then (fn []
(git-add-f)
;; TODO: save logseq/metadata