diff --git a/backend/src/app/storage/tmp.clj b/backend/src/app/storage/tmp.clj index 4bbff4a72d..aa9f7de8dc 100644 --- a/backend/src/app/storage/tmp.clj +++ b/backend/src/app/storage/tmp.clj @@ -79,14 +79,17 @@ ;; API ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defn tempfile - [& {:keys [suffix prefix min-age] +(defn tempfile* + [& {:keys [suffix prefix] :or {prefix "penpot." suffix ".tmp"}}] (let [attrs (fs/make-permissions "rw-r--r--") - path (fs/join default-tmp-dir (str prefix (uuid/next) suffix)) - path (Files/createFile path attrs)] - (fs/delete-on-exit! path) + path (fs/join default-tmp-dir (str prefix (uuid/next) suffix))] + (Files/createFile path attrs))) + +(defn tempfile + [& {:keys [min-age] :as opts}] + (let [path (tempfile* opts)] (sp/offer! queue [path (some-> min-age ct/duration)]) path))