3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-31 00:56:12 +02:00
Code Issues Projects Releases Packages Wiki Activity

♻️ Refactor paste function

Browse source
This commit is contained in:
Andrés Moya 2020-12-03 09:04:35 +01:00 • committed by Andrey Antukh
parent 6186d82151
commit e581cf8aeb
1 changed files with 9 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

20
frontend/src/app/main/data/workspace.cljs
View file

@ -1260,17 +1260,15 @@
ptk/WatchEvent
(watch [_ state stream]
(try
(let [paste-data (wapi/read-from-paste-event event)]
(when paste-data
(let [text-data (wapi/extract-text paste-data)
decoded-data (when (and paste-data (t/transit? text-data))
(t/decode text-data))]
(if (and decoded-data (= (:type decoded-data) :copied-shapes))
(rx/of (paste-shape decoded-data))
(if-not (empty? text-data)
(rx/of (paste-text text-data))
(let [images (wapi/extract-images paste-data)]
(rx/from (map paste-image images))))))))
(let [paste-data (wapi/read-from-paste-event event)
image-data (wapi/extract-images paste-data)
text-data (wapi/extract-text paste-data)
decoded-data (and (t/transit? text-data) (t/decode text-data))]
(cond
(seq image-data) (rx/from (map paste-image image-data))
decoded-data (rx/of (paste-shape decoded-data))
(string? text-data) (rx/of (paste-text text-data))
:else (rx/empty)))
(catch :default err
(js/console.error "Clipboard error:" err))))))