get bounds from cached value

Author: sprocketc

src/renderer/element/handlers.cljs

@@ -420,7 +420,7 @@
   (let [svgs (reverse (root-svgs db))
         pointer-pos (:adjusted-pointer-pos db)]
     (or
-     (some #(when (bounds/contain-point? (tool/bounds %) pointer-pos) %) svgs)
+     (some #(when (bounds/contained-point? (:bounds %) pointer-pos) %) svgs)
      (element db :canvas))))
 
 (defn translate
@@ -504,8 +504,8 @@
   (let [svgs (reverse (root-svgs db)) ; Reverse to select top svgs first.
         el-bounds (tool/bounds el)]
     (or
-     (some #(when (bounds/contained? el-bounds (tool/bounds %)) %) svgs)
-     (some #(when (bounds/intersected? el-bounds (tool/bounds %)) %) svgs)
+     (some #(when (bounds/contained? el-bounds (:bounds %)) %) svgs)
+     (some #(when (bounds/intersected? el-bounds (:bounds %)) %) svgs)
      (element db :canvas))))
 
 (defn create
@@ -587,7 +587,7 @@
          offset (mat/sub el-center center)
          el (dissoc el :bounds)
          svg (hovered-svg db)
-         [s-x1 s-y1] (tool/bounds svg)
+         [s-x1 s-y1] (:bounds svg)
          pointer-pos (:adjusted-pointer-pos db)
          selected (selected-keys db)]
      (reduce