Put grid on top of shapes.

This commit is contained in:
Andrey Antukh 2016-04-04 20:35:07 +03:00
parent c0bf28682c
commit cc7aef895e

View File

@ -63,15 +63,16 @@
:width width :width width
:height height} :height height}
(background) (background)
(when (contains? flags :grid)
(grid 1))
[:svg.page-layout {} [:svg.page-layout {}
(shapes-selection) (shapes-selection)
[:g.main {} [:g.main {}
(for [item (reverse (:shapes page))] (for [item (reverse (:shapes page))]
(-> (uus/shape item) (-> (uus/shape item)
(rum/with-key (str item)))) (rum/with-key (str item))))
(draw-area)]]]))) (draw-area)]]
(when (contains? flags :grid)
(grid 1))])))
(def canvas (def canvas
(mx/component (mx/component