🐛 Fix copy/paste issues

This commit is contained in:
AzazelN28 2024-12-09 16:07:44 +01:00
parent 4881bf3619
commit 4ef631fd6a
6 changed files with 82 additions and 5 deletions

View file

@ -145,6 +145,10 @@
(not= (.-tagName ^js target) "INPUT")) ;; an editable control
(.. ^js event getBrowserEvent -clipboardData))))
(defn extract-html-text
[clipboard-data]
(.getData clipboard-data "text/html"))
(defn extract-text
[clipboard-data]
(.getData clipboard-data "text"))