mirror of
https://github.com/penpot/penpot.git
synced 2025-12-11 22:14:05 +01:00
🐛 Fix problem with flow not being deleted (#7371)
This commit is contained in:
@@ -185,15 +185,17 @@
|
|||||||
interactions)))
|
interactions)))
|
||||||
(vals objects))
|
(vals objects))
|
||||||
|
|
||||||
|
id-to-delete? (set ids-to-delete)
|
||||||
changes
|
changes
|
||||||
(reduce (fn [changes {:keys [id] :as flow}]
|
(->> (:flows page)
|
||||||
(if (contains? ids-to-delete (:starting-frame flow))
|
(reduce
|
||||||
(-> changes
|
(fn [changes [id flow]]
|
||||||
(pcb/with-page page)
|
(if (id-to-delete? (:starting-frame flow))
|
||||||
(pcb/set-flow id nil))
|
(-> changes
|
||||||
changes))
|
(pcb/with-page page)
|
||||||
changes
|
(pcb/set-flow id nil))
|
||||||
(:flows page))
|
changes))
|
||||||
|
changes))
|
||||||
|
|
||||||
|
|
||||||
all-parents
|
all-parents
|
||||||
|
|||||||
Reference in New Issue
Block a user