fix: paste files when presented

This commit is contained in:
Tienson Qin
2025-12-01 12:40:47 +08:00
parent 9d579a3726
commit 11600c8dc3

View File

@@ -280,19 +280,8 @@
html (.getData clipboard-data "text/html")
text (.getData clipboard-data "text")
has-files? (seq (.-files clipboard-data))]
(cond
(and (string/blank? text) (string/blank? html))
;; When both text and html are blank, paste file if exists.
;; NOTE: util/stop is not called here if no file is provided,
;; so the default paste behavior of the native platform will be used.
(when has-files?
(paste-file-if-exists id e))
;; both file attachment and text/html exist
(and has-files? (state/preferred-pasting-file?))
(if has-files?
(paste-file-if-exists id e)
:else
(paste-text-or-blocks-aux (state/get-input) e text html)))))
(defn editor-on-paste-raw!