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

enhance: delete move-node

Browse Source
This commit is contained in:
Tienson Qin
2021-11-04 14:25:55 +08:00
parent bcabb49cc8
commit 29a96a7f3e
4 changed files with 29 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -954,7 +954,14 @@
(if (<= (count blocks) 1)
blocks
(let [[f s & _others] blocks]
(if (= (:block/left s) {:db/id (:db/id f)})
(if (or (= (:block/left s) {:db/id (:db/id f)})
(and
(let [parents (db/get-block-parents (state/get-current-repo)
(:block/uuid f)
100)]
(some #(= (:block/left s) {:db/id (:db/id %)})
parents))
(not= (:block/left f) {:db/id (:db/id s)})))
blocks
(reverse blocks)))))
@@ -1815,6 +1822,20 @@
blocks (db/pull-many repo '[*] lookup-refs)]
(reorder-blocks blocks)))
(defn- rehighlight-selected-nodes
([]
(rehighlight-selected-nodes (state/get-selection-blocks)))
([blocks]
(let [blocks (doall
(map
(fn [block]
(when-let [id (gobj/get block "id")]
(when-let [block (gdom/getElement id)]
(dom/add-class! block "selected noselect")
block)))
blocks))]
(state/set-selection-blocks! blocks))))
(defn move-up-down
[up?]
(fn [event]
@@ -1827,6 +1848,7 @@
:data blocks}]
(outliner-core/move-nodes nodes up?)
(db/refresh! repo opts)
(rehighlight-selected-nodes)
(let [block-node (util/get-first-block-by-id (:block/uuid (first blocks)))]
(.scrollIntoView block-node #js {:behavior "smooth" :block "nearest"}))))]
(if edit-block-id
@@ -1858,15 +1880,7 @@
(let [opts {:key :block/change
:data blocks}]
(db/refresh! repo opts)
(let [blocks (doall
(map
(fn [block]
(when-let [id (gobj/get block "id")]
(when-let [block (gdom/getElement id)]
(dom/add-class! block "selected noselect")
block)))
blocks-dom-nodes))]
(state/set-selection-blocks! blocks))))))))
(rehighlight-selected-nodes)))))))
(defn- get-link [format link label]
(let [link (or link "")