Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-15 17:21:17 -05:00
Code Issues Activity

✨ Save as dialog option

Browse source
This commit is contained in:
alonso.torres 2021-06-02 15:09:34 +02:00 • committed by Andrés Moya
parent a76bf1d0b2
commit 9f36f4fbe7
1 changed files with 21 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
frontend/src/app/util/dom.cljs
View file

@ -8,10 +8,11 @@
(:require (:require
[app.common.exceptions :as ex] [app.common.exceptions :as ex]
[app.common.geom.point :as gpt] [app.common.geom.point :as gpt]
[app.util.object :as obj]
[app.util.globals :as globals] [app.util.globals :as globals]
[app.util.object :as obj]
[cuerdas.core :as str] [cuerdas.core :as str]
[goog.dom :as dom])) [goog.dom :as dom]
[promesa.core :as p]))
;; --- Deprecated methods ;; --- Deprecated methods
@ -335,3 +336,21 @@
[filename blob] [filename blob]
(trigger-download-uri filename (.-type ^js blob) (create-uri blob))) (trigger-download-uri filename (.-type ^js blob) (create-uri blob)))
(defn save-as
[uri filename mtype description]
;; Only chrome supports the save dialog
(if (obj/contains? globals/window "showSaveFilePicker")
(let [extension (mtype->extension mtype)
opts {:suggestedName (str filename "." extension)
:types [{:description description
:accept { mtype [(str "." extension)]}}]}]
(p/let [file-system (.showSaveFilePicker globals/window (clj->js opts))
writable (.createWritable file-system)
response (js/fetch uri)
blob (.blob response)
_ (.write writable blob)]
(.close writable)))
(trigger-download-uri filename mtype uri)))