clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-30 17:06:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

enhance(ux): up/down for the code type block

Browse Source
This commit is contained in:
charlie
2024-09-29 19:52:21 +08:00
parent a045504708
commit d8bbea8ac2
2 changed files with 29 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
src/main/frontend/extensions/code.cljs
View File

@@ -1,5 +1,6 @@
(ns frontend.extensions.code
(:require [clojure.string :as string]
(:require [cljs-bean.core :as bean]
[clojure.string :as string]
["codemirror" :as CodeMirror]
["codemirror/addon/edit/closebrackets"]
["codemirror/addon/edit/matchbrackets"]
@@ -443,7 +444,16 @@
(reset! *editor-ref editor))]
(when editor
(let [textarea-ref (rum/ref-node state textarea-ref-name)
element (.getWrapperElement editor)]
element (.getWrapperElement editor)
*cursor-prev (volatile! nil)
*cursor-curr (volatile! nil)
update-cursor-state! (fn []
(let [pos (.getCursor editor)
pos (bean/->clj (js/JSON.parse (js/JSON.stringify pos)))]
(if (not @*cursor-prev)
(vreset! *cursor-prev pos)
(vreset! *cursor-prev @*cursor-curr))
(vreset! *cursor-curr pos)))]
(gobj/set textarea-ref codemirror-ref-name editor)
(when (= mode "calc")
(.on editor "change" (fn [_cm _e]
@@ -463,11 +473,20 @@
{:editor editor
:config config
:state state})))
(.on editor "cursorActivity" update-cursor-state!)
(.addEventListener element "keydown" (fn [e]
(let [key-code (.-code e)
meta-or-ctrl-pressed? (or (.-ctrlKey e) (.-metaKey e))
shifted? (.-shiftKey e)]
(cond
(contains? #{"ArrowUp" "ArrowDown"} key-code)
(do
(when (= @*cursor-prev @*cursor-curr)
(let [direction (if (= "ArrowUp" key-code) :up :down)]
(editor-handler/move-cross-boundary-up-down
direction {:input textarea
:pos [direction 0]})))
(update-cursor-state!))
meta-or-ctrl-pressed?
;; prevent default behavior of browser
;; Cmd + [ => Go back in browser, outdent in CodeMirror