fix: paste copied quote block got messed content

close #6229
This commit is contained in:
Tienson Qin
2022-08-04 13:46:27 +08:00
parent b66ec9cd9f
commit e1e8ff8a92

View File

@@ -68,7 +68,8 @@
internal-paste? (and
(seq (:copy/blocks copied-blocks))
;; not copied from the external clipboard
(= text (:copy/content copied-blocks)))]
(= (string/trimr text)
(string/trimr (:copy/content copied-blocks))))]
(if internal-paste?
(let [blocks (:copy/blocks copied-blocks)]
(when (seq blocks)