fix(pdf): insert highlight blocks for the file based graph

experiment/tanstack-table
charlie 2024-06-13 14:27:37 +08:00
parent 76ce3f72e8
commit 8de948f504
1 changed files with 5 additions and 2 deletions

View File

@ -15,6 +15,7 @@
[frontend.extensions.pdf.utils :as pdf-utils] [frontend.extensions.pdf.utils :as pdf-utils]
[frontend.format.block :as block] [frontend.format.block :as block]
[frontend.format.mldoc :as mldoc] [frontend.format.mldoc :as mldoc]
[frontend.config :as config]
[frontend.fs :as fs] [frontend.fs :as fs]
[frontend.fs.capacitor-fs :as capacitor-fs] [frontend.fs.capacitor-fs :as capacitor-fs]
[frontend.handler.assets :as assets-handler] [frontend.handler.assets :as assets-handler]
@ -524,6 +525,7 @@
edit-block? true}}] edit-block? true}}]
(when (or page block-uuid) (when (or page block-uuid)
(let [repo (state/get-current-repo) (let [repo (state/get-current-repo)
db-base? (config/db-based-graph? repo)
before? (if page false before?) before? (if page false before?)
sibling? (boolean sibling?) sibling? (boolean sibling?)
sibling? (if before? true (if page false sibling?)) sibling? (if before? true (if page false sibling?))
@ -541,7 +543,7 @@
(:block/format block) (:block/format block)
(db/get-page-format (:db/id block)) (db/get-page-format (:db/id block))
(state/get-preferred-format)) (state/get-preferred-format))
content (if (seq properties) content (if (and (not db-base?) (seq properties))
(property-file/insert-properties-when-file-based repo format content properties) (property-file/insert-properties-when-file-based repo format content properties)
content) content)
new-block (-> (select-keys block [:block/page]) new-block (-> (select-keys block [:block/page])
@ -583,7 +585,8 @@
:keep-uuid? true :keep-uuid? true
:ordered-list? ordered-list? :ordered-list? ordered-list?
:replace-empty-target? replace-empty-target?}) :replace-empty-target? replace-empty-target?})
(db-property-handler/set-block-properties! (:block/uuid new-block) properties)) (when (and db-base? (seq properties))
(db-property-handler/set-block-properties! (:block/uuid new-block) properties)))
(when edit-block? (when edit-block?
(if (and replace-empty-target? (if (and replace-empty-target?
(string/blank? (:block/content last-block))) (string/blank? (:block/content last-block)))