🐛 Fix file builder hangs on export

This commit is contained in:
Andrés Moya 2024-09-25 23:40:02 +02:00 committed by Andrés Moya
parent 22800e71df
commit 9064b9f849
2 changed files with 4 additions and 3 deletions

View file

@ -265,12 +265,12 @@
(p/create
(fn [resolve reject]
(->> (export-file file)
(rx/filter #(not= (:type %) :progress))
(rx/take 1)
(rx/subs!
(fn [value]
(when (not (contains? value :type))
(let [[_ export-blob] value]
(resolve export-blob))))
(let [[_ export-blob] value]
(resolve export-blob)))
reject))))))
(defn create-file-export [^string name]