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

✨ Change tool for exporting artboards and fix some issues

Browse source
This commit is contained in:
Andrés Moya 2021-11-05 13:08:28 +01:00 • committed by Andrey Antukh
parent c57219a356
commit 4962e45bd9
6 changed files with 46 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

42
frontend/src/app/main/ui/workspace/header.cljs
View file

@ -95,9 +95,9 @@
(mf/defc menu
[{:keys [layout project file team-id page-id] :as props}]
(let [show-menu? (mf/use-state false)
editing? (mf/use-state false)
editing? (mf/use-state false)
frames (mf/deref refs/workspace-frames)
frames (mf/deref refs/workspace-frames)
edit-input-ref (mf/use-ref nil)
@ -166,23 +166,24 @@
on-export-frames
(mf/use-callback
(mf/deps file)
(mf/deps file frames)
(fn [_]
(let [filename (str (:name file) ".pdf")
frame-ids (mapv :id frames)]
(st/emit! (dm/info (tr "workspace.options.exporting-object")
{:timeout nil}))
(->> (rp/query! :export-frames
{:name (:name file)
:file-id (:id file)
:page-id page-id
:frame-ids frame-ids})
(rx/subs
(fn [body]
(dom/trigger-download filename body))
(fn [_error]
(st/emit! (dm/error (tr "errors.unexpected-error"))))
(st/emitf dm/hide))))))]
(when (seq frames)
(let [filename (str (:name file) ".pdf")
frame-ids (mapv :id frames)]
(st/emit! (dm/info (tr "workspace.options.exporting-object")
{:timeout nil}))
(->> (rp/query! :export-frames
{:name (:name file)
:file-id (:id file)
:page-id page-id
:frame-ids frame-ids})
(rx/subs
(fn [body]
(dom/trigger-download filename body))
(fn [_error]
(st/emit! (dm/error (tr "errors.unexpected-error"))))
(st/emitf dm/hide)))))))]
(mf/use-effect
(mf/deps @editing?)
@ -282,8 +283,9 @@
[:li.export-file {:on-click on-export-file}
[:span (tr "dashboard.export-single")]]
[:li.export-file {:on-click on-export-frames}
[:span (tr "dashboard.export-frames")]]
(when (seq frames)
[:li.export-file {:on-click on-export-frames}
[:span (tr "dashboard.export-frames")]])
(when (contains? @cf/flags :user-feedback)
[:li.feedback {:on-click (st/emitf (rt/nav :settings-feedback))}