Properly trigger page update on shape movement.

This commit is contained in:
Andrey Antukh
2016-04-13 20:15:07 +03:00
parent e40632cca6
commit 5624882ce2

View File

@@ -43,6 +43,7 @@
"Just updates in place the shape."
[{:keys [id] :as shape}]
(reify
udp/IPageUpdate
rs/UpdateEvent
(-apply-update [_ state]
(update-in state [:shapes-by-id id] merge shape))))