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

feat: add more CodeMirror modes

Browse Source 
Closed #929.
Also, fixed an issue that a following click will close the editing block.
This commit is contained in:
Tienson Qin
2020-12-16 23:38:29 +08:00
parent aced8ca761
commit 1bf9f6dd97
2 changed files with 24 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -15,6 +15,8 @@
["codemirror/addon/edit/closebrackets"]
["codemirror/mode/clojure/clojure"]
["codemirror/mode/javascript/javascript"]
["codemirror/mode/clike/clike"]
["codemirror/mode/vue/vue"]
["codemirror/mode/commonlisp/commonlisp"]
["codemirror/mode/coffeescript/coffeescript"]
["codemirror/mode/css/css"]
@@ -79,13 +81,28 @@
:else
nil)))
(defn- text->cm-mode
[text]
(when text
(let [mode (string/lower-case text)]
(case mode
"html" "text/html"
"c" "text/x-csrc"
"c++" "text/x-c++src"
"java" "text/x-java"
"c#" "text/x-csharp"
"csharp" "text/x-csharp"
"objective-c" "text/x-objectivec"
"scala" "text/x-scala"
mode))))
(defn render!
[state]
(let [[config id attr code pos_meta] (:rum/args state)
original-mode (get attr :data-lang)
mode (or original-mode "javascript")
clojure? (contains? #{"clojure" "clj" "text/x-clojure" "cljs" "cljc"} mode)
mode (if clojure? "clojure" mode)
mode (if clojure? "clojure" (text->cm-mode mode))
lisp? (or clojure?
(contains? #{"scheme" "racket" "lisp"} mode))
textarea (gdom/getElement id)
@@ -147,7 +164,7 @@
[state config id attr code pos_meta]
[:div.extensions__code
[:div.extensions__code-lang
(let [mode (get attr :data-lang "javascript")]
(let [mode (string/lower-case (get attr :data-lang "javascript"))]
(if (= mode "text/x-clojure")
"clojure"
mode))]