Delay grid alignment index initialization until user stop typing.

This commit is contained in:
Andrey Antukh 2016-12-18 21:51:51 +01:00
parent 32041b9596
commit 74bcdd2507
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
2 changed files with 24 additions and 13 deletions

View file

@ -82,16 +82,16 @@
(when-let [value (-> (mx/ref-node own "x-axis")
(dom/get-value)
(parse-int nil))]
(->> (assoc metadata :grid-x-axis value)
(udp/update-metadata id)
(st/emit!))))
(st/emit!
(->> (assoc metadata :grid-x-axis value)
(udw/update-metadata id)))))
(on-y-change []
(when-let [value (-> (mx/ref-node own "y-axis")
(dom/get-value)
(parse-int nil))]
(->> (assoc metadata :grid-y-axis value)
(udp/update-metadata id)
(st/emit!))))
(st/emit!
(->> (assoc metadata :grid-y-axis value)
(udw/update-metadata id)))))
(on-magnet-change []
(let [checked? (dom/checked? (mx/ref-node own "magnet"))
metadata (assoc metadata :grid-alignment checked?)]