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

fix: code block issue

Browse Source 
Close #2000
This commit is contained in:
Tienson Qin
2021-05-27 14:48:06 +08:00
parent 52ab749445
commit 70ebbc286b
2 changed files with 9 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/main/frontend/format/block.cljs
View File

@@ -384,6 +384,10 @@
content (cons f body)]
(string/join "\n" content)))
(defn src-block?
[block]
(some (fn [x] (and (vector? x) (= "Src" (first x)))) (:body block)))
(defn- get-block-content
[utf8-content block format]
(let [meta (:meta block)
@@ -392,11 +396,13 @@
(:start-pos meta)
end-pos)
(utf8/substring utf8-content
(:start-pos meta)))]
(:start-pos meta)))
content-orig content]
(let [content (when content
(let [content (text/remove-level-spaces content format)]
(if (or (:pre-block? block)
(= (:format block) :org))
(= (:format block) :org)
(src-block? block))
content
(remove-indentation-spaces content (:level block)))))]
(if (= format :org)