clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-28 16:15:21 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: lint issues

Browse Source
This commit is contained in:
Peng Xiao
2022-09-17 22:53:08 +08:00
parent 6c2f31195f
commit 564e2fe1b4
4 changed files with 19 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
src/main/frontend/handler/whiteboard.cljs
View File

@@ -2,7 +2,6 @@
(:require [datascript.core :as d]
[frontend.db.model :as model]
[frontend.db.utils :as db-utils]
[frontend.handler.editor :as editor-handler]
[frontend.modules.outliner.core :as outliner]
[frontend.modules.outliner.file :as outliner-file]
[frontend.state :as state]
@@ -33,10 +32,6 @@
[]
js/window.tln)
(defn get-tldr-api
[]
(when (get-tldr-app) js/tln.api))
(defn tldraw-idle?
"return true when tldraw is active and idle. nil when tldraw is
not active."
@@ -163,24 +158,24 @@
(create-new-whiteboard-page! page-name))
(create-new-whiteboard-page! nil))))
(defn ->logseq-portal-shape
[block-id point]
{:blockType "B"
:id (str (d/squuid))
:compact true
:pageId (str block-id)
:point point
:size [400, 0]
:type "logseq-portal"})
;; (defn ->logseq-portal-shape
;; [block-id point]
;; {:blockType "B"
;; :id (str (d/squuid))
;; :compact true
;; :pageId (str block-id)
;; :point point
;; :size [400, 0]
;; :type "logseq-portal"})
(defn add-new-block-portal-shape!
"Given the block uuid and the point, add a new shape to the referenced block."
[block-uuid client-x client-y]
(let [api (get-tldr-api)
point (js->clj (.. (get-tldr-app) -viewport (getPagePoint #js[client-x client-y])))
shape (->logseq-portal-shape block-uuid point)]
(editor-handler/set-blocks-id! [block-uuid])
(.createShapes api (clj->js shape))))
;; (defn add-new-block-portal-shape!
;; "Given the block uuid and the point, add a new shape to the referenced block."
;; [block-uuid client-x client-y]
;; (let [api (get-tldr-api)
;; point (js->clj (.. (get-tldr-app) -viewport (getPagePoint #js[client-x client-y])))
;; shape (->logseq-portal-shape block-uuid point)]
;; (editor-handler/set-blocks-id! [block-uuid])
;; (.createShapes api (clj->js shape))))
(defn- get-whiteboard-blocks
"Given a page, return all the logseq blocks (exlude all shapes)"