Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-13 08:11:30 -05:00
Code Issues Activity

💄 Add cosmetic changes to duplicate-page function

Browse source
This commit is contained in:
Andrey Antukh 2023-05-05 14:13:43 +02:00
parent 64cef9bb7d
commit 541a372f01
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
frontend/src/app/main/data/workspace.cljs
View file

@ -449,10 +449,12 @@
page (get-in state [:workspace-data :pages-index page-id])
name (cp/generate-unique-name unames (:name page))
no_thumbnails_objects (->> (:objects page)
(d/mapm (fn [_ val] (dissoc val :use-for-thumbnail?))))
page (-> page (assoc :name name :id id :objects no_thumbnails_objects))
page (-> page
(assoc :name name)
(assoc :id id)
(assoc :objects
(->> (:objects page)
(d/mapm (fn [_ val] (dissoc val :use-for-thumbnail?))))))
changes (-> (pcb/empty-changes it)
(pcb/add-page id page))]
@ -1265,7 +1267,7 @@
not-group-like? (and (= (count selected) 1)
(not (contains? #{:group :bool} (:type head))))
no-bool-shapes? (->> all-selected (some (comp #{:frame :text} :type)))]
(rx/concat