clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-24 22:25:01 +00:00
Code Issues Packages Projects Releases Wiki Activity

enhance(pdf): UI lag for the case of large highlights data

Browse Source
This commit is contained in:
charlie
2023-03-06 17:51:39 +08:00
committed by Tienson Qin
parent e52bda80c9
commit 22dfa621e4
3 changed files with 9 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
deps.edn
View File

@@ -28,7 +28,8 @@
instaparse/instaparse {:mvn/version "1.4.10"}
org.clojars.mmb90/cljs-cache {:mvn/version "0.1.4"}
logseq/graph-parser {:local/root "deps/graph-parser"}
metosin/malli {:mvn/version "0.10.0"}}
metosin/malli {:mvn/version "0.10.0"}
fipp/fipp {:mvn/version "0.6.26"}}
:aliases {:cljs {:extra-paths ["src/dev-cljs/" "src/test/" "src/electron/"]
:extra-deps {org.clojure/clojurescript {:mvn/version "1.11.54"}

6
src/main/frontend/extensions/pdf/assets.cljs
View File

@@ -1,7 +1,6 @@
(ns frontend.extensions.pdf.assets
(:require [cljs.reader :as reader]
[clojure.string :as string]
[cljs.pprint :as pprint]
[frontend.config :as config]
[frontend.db.model :as db-model]
[frontend.db.utils :as db-utils]
@@ -23,7 +22,8 @@
[medley.core :as medley]
[promesa.core :as p]
[reitit.frontend.easy :as rfe]
[rum.core :as rum]))
[rum.core :as rum]
[fipp.edn :refer [pprint]]))
(defn inflate-asset
[original-path]
@@ -64,7 +64,7 @@
(when hls-file
(let [repo-cur (state/get-current-repo)
repo-dir (config/get-repo-dir repo-cur)
data (with-out-str (pprint/pprint {:highlights highlights :extra extra}))]
data (with-out-str (pprint {:highlights highlights :extra extra}))]
(fs/write-file! repo-cur repo-dir hls-file data {:skip-compare? true}))))
(defn resolve-hls-data-by-key$

6
src/main/frontend/extensions/pdf/core.cljs
View File

@@ -844,8 +844,10 @@
(when (= :completed (:status loader-state))
(p/catch
(when-not (:error hls-state)
(pdf-assets/persist-hls-data$
pdf-current (:latest-hls hls-state) (:extra hls-state)))
(p/do!
(p/delay 100)
(pdf-assets/persist-hls-data$
pdf-current (:latest-hls hls-state) (:extra hls-state))))
;; write hls file error
(fn [e]