clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-24 14:14:55 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: cmd+k shows configure tag but creating a new page

Browse Source 
related to https://github.com/logseq/db-test/issues/583
This commit is contained in:
Tienson Qin
2025-11-12 02:20:10 +08:00
parent b9318281f3
commit f85546c15a
1 changed files with 22 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
src/main/frontend/components/cmdk/core.cljs
View File

@@ -89,21 +89,24 @@
(not config/publishing?))
(let [class? (string/starts-with? q "#")
class-name (get-class-from-input q)
class (ldb/class? (db/get-case-page class-name))]
class (let [class (db/get-case-page class-name)]
(when (ldb/class? class)
class))]
(->> [{:text (cond
class "Configure tag"
class? "Create tag"
:else "Create page")
:icon "new-page"
:icon-theme :gray
:info (if class?
(let [class-name (get-class-from-input q)
class (db/get-case-page class-name)]
(if class
(str "Configure #" class-name)
(str "Create tag called '" class-name "'")))
:info (cond
class
(str "Configure #" class-name)
class?
(str "Create tag called '" class-name "'")
:else
(str "Create page called '" q "'"))
:source-create :page}]
:source-create :page
:class class}]
(remove nil?)))))
;; Take the results, decide how many items to show, and order the results appropriately
@@ -564,15 +567,17 @@
create-whiteboard? (= :whiteboard (:source-create item))
create-page? (= :page (:source-create item))
class (when create-class? (get-class-from-input @!input))]
(p/let [result (cond
create-class?
(db-page-handler/<create-class! class
{:redirect? false})
create-whiteboard? (whiteboard-handler/<create-new-whiteboard-and-redirect! @!input)
create-page? (page-handler/<create! @!input {:redirect? true}))]
(shui/dialog-close! :ls-dialog-cmdk)
(when (and create-class? result)
(state/pub-event! [:dialog/show-block result {:tag-dialog? true}])))))
(if (and (= (:text item) "Configure tag") (:class item))
(state/pub-event! [:dialog/show-block (:class item) {:tag-dialog? true}])
(p/let [result (cond
create-class?
(db-page-handler/<create-class! class
{:redirect? false})
create-whiteboard? (whiteboard-handler/<create-new-whiteboard-and-redirect! @!input)
create-page? (page-handler/<create! @!input {:redirect? true}))]
(shui/dialog-close! :ls-dialog-cmdk)
(when (and create-class? result)
(state/pub-event! [:dialog/show-block (:class item) {:tag-dialog? true}]))))))
(defn- get-filter-user-input
[input]