clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-29 08:26:40 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix(editor): handle convertion from file ext to language mode

Browse Source
This commit is contained in:
Andelf
2021-12-20 14:39:41 +08:00
committed by Tienson Qin
parent 3a1bd3c943
commit f838590ea5
1 changed files with 18 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -182,26 +182,34 @@
nil))))
(defn- text->cm-mode
[text]
(when text
(let [mode (string/lower-case text)
find-mode-by-name (gobj/get cm "findModeByName")
cm-mode (find-mode-by-name mode)]
(if cm-mode
(.-mime cm-mode)
mode))))
([text]
(text->cm-mode text :name))
([text by]
(when text
(let [mode (string/lower-case text)
find-fn-name (case by
:name "findModeByName"
:ext "findModeByExtension"
:file-name "findModeByFileName"
"findModeByName")
find-fn (gobj/get cm find-fn-name)
cm-mode (find-fn mode)]
(if cm-mode
(.-mime cm-mode)
mode)))))
(defn render!
[state]
(let [esc-pressed? (atom nil)
dark? (state/dark?)
[config id attr code theme] (:rum/args state)
default-open? (and (:editor/code-mode? @state/state)
(= (:block/uuid (state/get-edit-block))
(get-in config [:block :block/uuid])))
_ (state/set-state! :editor/code-mode? false)
original-mode (get attr :data-lang)
mode (text->cm-mode original-mode)
mode (if (:file? config)
(text->cm-mode original-mode :ext) ;; ref: src/main/frontend/components/file.cljs
(text->cm-mode original-mode :name))
lisp-like? (contains? #{"scheme" "lisp" "clojure" "edn"} mode)
textarea (gdom/getElement id)
editor (when textarea