clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-01 17:36:33 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat: add properties as linked references

Browse Source
This commit is contained in:
Tienson Qin
2022-07-05 03:48:55 +08:00
parent 7c7312d830
commit 49acb54178
13 changed files with 144 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -661,7 +661,7 @@
(defn properties-block
[properties format page]
(let [content (property/insert-properties format "" properties)
refs (gp-block/get-page-refs-from-properties properties
refs (gp-block/get-page-refs-from-properties format properties
(db/get-db (state/get-current-repo))
(state/get-date-formatter))]
{:block/pre-block? true
@@ -1616,6 +1616,10 @@
[q]
(search/template-search q))
(defn get-matched-properties
[q]
(search/property-search q))
(defn get-matched-commands
[input]
(try
@@ -1825,7 +1829,9 @@
(defn handle-last-input []
(let [input (state/get-input)
pos (cursor/pos input)
last-input-char (util/nth-safe (.-value input) (dec pos))]
last-input-char (util/nth-safe (.-value input) (dec pos))
last-prev-input-char (util/nth-safe (.-value input) (dec (dec pos)))
prev-prev-input-char (util/nth-safe (.-value input) (- pos 3))]
;; TODO: is it cross-browser compatible?
;; (not= (gobj/get native-e "inputType") "insertFromPaste")
@@ -1842,6 +1848,16 @@
(commands/reinit-matched-block-commands!)
(state/set-editor-show-block-commands!))
(and (= last-input-char last-prev-input-char commands/colon)
(or (nil? prev-prev-input-char)
(= prev-prev-input-char "\n")))
(do
(state/set-editor-action-data! {:pos (cursor/get-caret-pos input)})
(state/set-editor-show-property-search! true))
(and (= last-input-char commands/colon) (= :property-search (state/get-editor-action)))
(state/clear-editor-action!)
:else
nil)))
@@ -2041,6 +2057,18 @@
(insert-template! element-id db-id
{:replace-empty-target? true})))
(defn property-on-chosen-handler
[element-id q]
(fn [property]
(when-let [input (gdom/getElement element-id)]
(let [value (.-value input)
pos (util/get-selection-start input)
last-index (string/last-index-of (subs value 0 pos) "::")
last-pattern (subs value last-index pos)]
(commands/insert! element-id (str (or property q) ":: ")
{:last-pattern last-pattern})
(state/clear-editor-action!)))))
(defn parent-is-page?
[{{:block/keys [parent page]} :data :as node}]
{:pre [(tree/satisfied-inode? node)]}