0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-03 04:49:03 -05:00

🐛 [Prototype] Prototype mode should not allow edits

This commit is contained in:
Alejandro Alonso 2022-02-25 11:40:25 +01:00 committed by Andrey Antukh
parent b4c87ad0b9
commit d2590c7651
2 changed files with 15 additions and 2 deletions

View file

@ -754,9 +754,13 @@
ptk/WatchEvent
(watch [_ state _]
(let [selected (wsh/lookup-selected state)
hover-guides (get-in state [:workspace-guides :hover])]
hover-guides (get-in state [:workspace-guides :hover])
options-mode (get-in state [:workspace-global :options-mode])]
(cond
(d/not-empty? selected)
(and (= options-mode :prototype) (d/not-empty? selected))
(rx/of (dwi/remove-interactions selected))
(and (= options-mode :design) (d/not-empty? selected))
(rx/of (dwc/delete-shapes selected)
(dws/deselect-all))

View file

@ -171,6 +171,15 @@
(update shape :interactions
csi/remove-interaction index)))))))
(defn remove-interactions
[ids]
(ptk/reify ::remove-interactions
ptk/WatchEvent
(watch [_ _ _]
(rx/of (dch/update-shapes ids
(fn [shape]
(assoc shape :interactions [])))))))
(defn update-interaction
[shape index update-fn]
(ptk/reify ::update-interaction