0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-24 07:29:08 -05:00

🎉 Add clipboard related functions to webapi utils.

This commit is contained in:
Andrey Antukh 2020-03-23 15:28:12 +01:00
parent c66b483fba
commit 1195777036

View file

@ -7,8 +7,10 @@
(ns uxbox.util.webapi
"HTML5 web api helpers."
(:require
[promesa.core :as p]
[beicon.core :as rx]
[cuerdas.core :as str]))
[cuerdas.core :as str]
[uxbox.util.transit :as t]))
(defn read-file-as-text
[file]
@ -65,4 +67,19 @@
;; (rx/create on-subscribe)))
(defn write-to-clipboard
[data]
(let [cboard (unchecked-get js/navigator "clipboard")]
(.writeText cboard (uxbox.util.transit/encode data))))
(defn- read-from-clipboard
[]
(let [cboard (unchecked-get js/navigator "clipboard")]
(-> (.readText cboard)
(p/then (fn [data]
(try
(t/decode data)
(catch :default e
nil)))))))