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

Merge remote-tracking branch 'upstream/master' into whiteboards

Browse Source
This commit is contained in:
Peng Xiao
2022-07-07 14:07:35 +08:00
parent 51cf9a5b0c 56afc59304
commit d3dae5fddc
50 changed files with 946 additions and 684 deletions
Download Patch File Download Diff File Expand all files Collapse all files

84
src/main/frontend/state.cljs
View File

@@ -97,12 +97,9 @@
:config {}
:block/component-editing-mode? false
:editor/draw-mode? false
:editor/show-page-search? false
:editor/show-page-search-hashtag? false
:editor/show-date-picker? false
:editor/action nil
:editor/action-data nil
;; With label or other data
:editor/show-input nil
:editor/show-zotero false
:editor/last-saved-cursor nil
:editor/editing? nil
:editor/in-composition? false
@@ -598,63 +595,58 @@
[value]
(set-state! :search/mode value))
(defn set-editor-show-page-search!
(defn set-editor-action!
[value]
(set-state! :editor/show-page-search? value))
(set-state! :editor/action value))
(defn set-editor-action-data!
[value]
(set-state! :editor/action-data value))
(defn get-editor-action
[]
(:editor/action @state))
(defn get-editor-action-data
[]
(:editor/action-data @state))
(defn get-editor-show-page-search?
[]
(get @state :editor/show-page-search?))
(= (get-editor-action) :page-search))
(defn set-editor-show-page-search-hashtag!
[value]
(set-state! :editor/show-page-search? value)
(set-state! :editor/show-page-search-hashtag? value))
(defn get-editor-show-page-search-hashtag?
[]
(get @state :editor/show-page-search-hashtag?))
(defn set-editor-show-block-search!
[value]
(set-state! :editor/show-block-search? value))
(= (get-editor-action) :page-search-hashtag))
(defn get-editor-show-block-search?
[]
(get @state :editor/show-block-search?))
(defn set-editor-show-template-search!
[value]
(set-state! :editor/show-template-search? value))
(defn get-editor-show-template-search?
[]
(get @state :editor/show-template-search?))
(defn set-editor-show-date-picker!
[value]
(set-state! :editor/show-date-picker? value))
(defn get-editor-show-date-picker?
[]
(get @state :editor/show-date-picker?))
(= (get-editor-action) :block-search))
(defn set-editor-show-input!
[value]
(set-state! :editor/show-input value))
(if value
(do
(set-editor-action-data! (assoc (get-editor-action-data) :options value))
(set-editor-action! :input))
(do
(set-editor-action! nil)
(set-editor-action-data! nil))))
(defn get-editor-show-input
[]
(get @state :editor/show-input))
(when (= (get-editor-action) :input)
(get @state :editor/action-data)))
(defn set-editor-show-commands!
[]
(when-not (get-editor-action) (set-editor-action! :commands)))
(defn set-editor-show-block-commands!
[]
(when-not (get-editor-action) (set-editor-action! :block-commands)))
(defn set-editor-show-zotero!
[value]
(set-state! :editor/show-zotero value))
;; TODO: refactor, use one state
(defn clear-editor-show-state!
(defn clear-editor-action!
[]
(swap! state (fn [state]
(assoc state
:editor/show-input nil
:editor/show-zotero false
:editor/show-date-picker? false
:editor/show-block-search? false
:editor/show-template-search? false
:editor/show-page-search? false
:editor/show-page-search-hashtag? false))))
(assoc state :editor/action nil))))
(defn set-edit-input-id!
[input-id]