0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-31 19:39:07 -05:00

🐛 Fix delete page navigation to first page

This commit is contained in:
Alejandro Alonso 2025-01-17 11:29:13 +01:00
parent 77477e09a2
commit 6c25e18f09

View file

@ -638,6 +638,7 @@
index (d/index-of pages id)
page (get pindex id)
page (assoc page :index index)
pages (filter #(not= % id) pages)
changes (-> (pcb/empty-changes it)
(pcb/with-library-data fdata)
@ -646,7 +647,7 @@
(rx/of (dch/commit-changes changes)
(when (= id (:current-page-id state))
(dcm/go-to-workspace)))))))
(dcm/go-to-workspace {:page-id (first pages)})))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; WORKSPACE File Actions