greatbody
/
logseq
mirror of https://github.com/logseq/logseq
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

improve(pdf): unlink area image file when remove corresponding highlight

pull/2471/head
charlie 2021-08-05 11:15:24 +08:00
parent 441a5ec077
commit 0d1e0db1e6
2 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -87,8 +87,9 @@
;; dir
fname (str (:page hl) "_" (:id hl))
fdir (str config/local-assets-dir "/" key)
fpath (str fdir "/" fname ".png")
_ (fs/mkdir-if-not-exists (str repo-dir "/" fdir))
_ (fs/write-file! repo-cur repo-dir (str fdir "/" fname ".png") png {:skip-mtime? true})]
_ (fs/write-file! repo-cur repo-dir fpath png {:skip-mtime? true})]
(js/console.timeEnd :write-area-image))
@ -99,7 +100,15 @@
))))
(defn unlink-hl-area-image$
[])
[^js viewer current hl]
(when-let [fkey (and (area-highlight? hl) (:key current))]
(let [repo-cur (state/get-current-repo)
repo-dir (config/get-repo-dir repo-cur)
fname (str (:page hl) "_" (:id hl))
fdir (str config/local-assets-dir "/" fkey)
fpath (utils/node-path.join repo-dir (str fdir "/" fname ".png"))]
(fs/unlink! repo-cur fpath {}))))
(defn resolve-ref-page
[page-name]
@ -236,7 +245,7 @@
(when-let [hl-page (:hl-page props)]
;; TODO: async?
(let [asset-path (editor-handler/make-asset-url
(str "/" config/local-assets-dir "/" group-key "/" (str hl-page "_" id ".png")))]
(str "/" config/local-assets-dir "/" group-key "/" (str hl-page "_" id ".png")))]
[:span.hl-area
[:img {:src asset-path}]]))))))

3
src/main/frontend/extensions/pdf/highlights.cljs
View File

@ -112,7 +112,8 @@
"del"
(do
(del-hl! highlight)
(pdf-assets/del-ref-block! highlight))
(pdf-assets/del-ref-block! highlight)
(pdf-assets/unlink-hl-area-image$ viewer (:pdf/current @state/state) highlight))
;; colors
(let [properties {:color action}]