clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-05 03:16:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

refactor: switch back to store properties directly in plain-text

Browse Source
This commit is contained in:
Tienson Qin
2021-04-14 10:51:14 +08:00
parent 073e0cc554
commit e873690a8b
7 changed files with 74 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
src/main/frontend/handler/editor.cljs
View File

@@ -253,13 +253,9 @@
(defn- wrap-parse-block
[{:block/keys [content format] :as block}]
(let [ast (mldoc/->edn (string/trim content) (mldoc/default-config format))
properties? (contains? #{"properties" "property_drawer"}
(when-let [type (first (ffirst ast))]
(string/lower-case type)))
content' (if properties?
(string/trim content)
(str (config/get-block-pattern format) " "
(string/triml content)))]
heading? (= "Paragraph" (first (ffirst ast)))
content' (str (config/get-block-pattern format) (if heading? " " "\n")
(string/triml content))]
(-> (block/parse-block (assoc block :block/content content'))
(dissoc :block/top?
:block/block-refs-count)
@@ -749,12 +745,19 @@
repo (state/get-current-repo)]
(when repo
(when-let [block (db/entity [:block/uuid block-id])]
(let [properties (:block/properties block)
(let [format (:block/format block)
content (:block/content block)
markdown? (= format :markdown)
properties (:block/properties block)
properties (if value ; add
(assoc properties key value)
(dissoc properties key))
content (if value
(text/insert-property content key value)
(text/remove-property content key))
block (outliner-core/block {:block/uuid block-id
:block/properties properties})]
:block/properties properties
:block/content content})]
(outliner-core/save-node block)
(let [opts {:key :block/change
:data [block]}]