mirror of
https://github.com/logseq/logseq.git
synced 2026-05-05 19:36:35 +00:00
fix: clean code
This commit is contained in:
@@ -195,11 +195,7 @@
|
||||
|
||||
:else
|
||||
(let [part (->> (take per-length data)
|
||||
(map (comp edn/read-string
|
||||
#(gobj/get % "datoms")))
|
||||
(remove (fn [data]
|
||||
(and (map? data)
|
||||
(= :db/type (:db/ident data))))))]
|
||||
(mapcat (comp edn/read-string #(gobj/get % "datoms"))))]
|
||||
(transact! repo part {:skip-persist? true})
|
||||
(p/let [_ (p/delay 200)]
|
||||
(p/recur (drop per-length data))))))))
|
||||
|
||||
Reference in New Issue
Block a user