mirror of
https://github.com/logseq/logseq.git
synced 2026-04-29 00:24:51 +00:00
refactor: separate og and db version (#12276)
separate og and new version apps remove file sync, tldraw, excalidraw and zotero
This commit is contained in:
@@ -1,72 +1,39 @@
|
||||
(ns frontend.handler.property
|
||||
"Property fns for both file and DB graphs"
|
||||
(:require [frontend.config :as config]
|
||||
[frontend.db.model :as db-model]
|
||||
(:require [frontend.db.model :as db-model]
|
||||
[frontend.handler.db-based.property :as db-property-handler]
|
||||
[frontend.handler.file-based.page-property :as file-page-property]
|
||||
[frontend.handler.file-based.property :as file-property-handler]
|
||||
[frontend.state :as state]))
|
||||
|
||||
(defn remove-block-property!
|
||||
[repo block-id property-id-or-key]
|
||||
[block-id property-id-or-key]
|
||||
(assert (some? property-id-or-key) "remove-block-property! remove-block-property! is nil")
|
||||
(if (config/db-based-graph? repo)
|
||||
(let [eid (if (uuid? block-id) [:block/uuid block-id] block-id)]
|
||||
(db-property-handler/remove-block-property! eid property-id-or-key))
|
||||
(file-property-handler/remove-block-property! block-id property-id-or-key)))
|
||||
(let [eid (if (uuid? block-id) [:block/uuid block-id] block-id)]
|
||||
(db-property-handler/remove-block-property! eid property-id-or-key)))
|
||||
|
||||
(defn set-block-property!
|
||||
[repo block-id key v]
|
||||
[block-id key v]
|
||||
(assert (some? key) "set-block-property! key is nil")
|
||||
(if (config/db-based-graph? repo)
|
||||
(let [eid (if (uuid? block-id) [:block/uuid block-id] block-id)]
|
||||
(if (or (nil? v) (and (coll? v) (empty? v)))
|
||||
(db-property-handler/remove-block-property! eid key)
|
||||
(db-property-handler/set-block-property! eid key v)))
|
||||
(file-property-handler/set-block-property! block-id key v)))
|
||||
|
||||
(defn add-page-property!
|
||||
"Sanitized page-name, unsanitized key / value"
|
||||
[page-entity key value]
|
||||
(assert (some? key) "key is nil")
|
||||
(when page-entity
|
||||
(let [repo (state/get-current-repo)]
|
||||
(if (config/db-based-graph? repo)
|
||||
(set-block-property! repo (:block/uuid page-entity) key value)
|
||||
(file-page-property/add-property! page-entity key value)))))
|
||||
|
||||
(defn remove-id-property
|
||||
[repo format content]
|
||||
(if (config/db-based-graph? repo)
|
||||
content
|
||||
(file-property-handler/remove-id-property format content)))
|
||||
|
||||
(defn file-persist-block-id!
|
||||
[repo block-id]
|
||||
(when-not (config/db-based-graph? repo)
|
||||
(file-property-handler/set-block-property! block-id :id (str block-id))))
|
||||
(let [eid (if (uuid? block-id) [:block/uuid block-id] block-id)]
|
||||
(if (or (nil? v) (and (coll? v) (empty? v)))
|
||||
(db-property-handler/remove-block-property! eid key)
|
||||
(db-property-handler/set-block-property! eid key v))))
|
||||
|
||||
(defn batch-remove-block-property!
|
||||
[repo block-ids key]
|
||||
[block-ids key]
|
||||
(assert (some? key) "key is nil")
|
||||
(if (config/db-based-graph? repo)
|
||||
(db-property-handler/batch-remove-property! block-ids key)
|
||||
(file-property-handler/batch-remove-block-property! block-ids key)))
|
||||
(db-property-handler/batch-remove-property! block-ids key))
|
||||
|
||||
(defn batch-set-block-property!
|
||||
[repo block-ids key value & {:as opts}]
|
||||
[block-ids key value & {:as opts}]
|
||||
(assert (some? key) "key is nil")
|
||||
(if (config/db-based-graph? repo)
|
||||
(if (nil? value)
|
||||
(db-property-handler/batch-remove-property! block-ids key)
|
||||
(db-property-handler/batch-set-property! block-ids key value opts))
|
||||
(file-property-handler/batch-set-block-property! block-ids key value)))
|
||||
(if (nil? value)
|
||||
(db-property-handler/batch-remove-property! block-ids key)
|
||||
(db-property-handler/batch-set-property! block-ids key value opts)))
|
||||
|
||||
(defn set-block-properties!
|
||||
[repo block-id properties]
|
||||
[block-id properties]
|
||||
(assert (uuid? block-id))
|
||||
(when (config/db-based-graph? repo)
|
||||
(db-property-handler/set-block-properties! block-id properties)))
|
||||
(db-property-handler/set-block-properties! block-id properties))
|
||||
|
||||
(defonce class-property-excludes
|
||||
#{:logseq.property.class/properties :block/tags
|
||||
|
||||
Reference in New Issue
Block a user