add edit test

Author: sprocketc

src/renderer/tool/impl/base/edit.cljs

@@ -66,7 +66,7 @@
                 (pointer/lock-direction))]
     (cond-> db
       el-id
-      (-> (element.h/update-el el-id element.hierarchy/edit delta handle-id)))))
+      (element.h/update-el el-id element.hierarchy/edit delta handle-id))))
 
 (defmethod hierarchy/drag-end :edit
   [db _e]
@@ -94,10 +94,10 @@
 (defmethod hierarchy/render :edit
   []
   (let [selected-elements @(rf/subscribe [::element.s/selected])]
-    [:<>
+    [:g
      (for [el selected-elements]
        ^{:key (str (:id el) "-edit-points")}
        [:g
-        (element.hierarchy/render-edit el)
+        [element.hierarchy/render-edit el]
         ^{:key (str (:id el) "-centroid")}
         [overlay/centroid el]])]))

test/tool_impl_test.cljs

@@ -0,0 +1,26 @@
+(ns tool-impl-test
+  (:require
+   [cljs.test :refer-macros [deftest is]]
+   [day8.re-frame.test :as rf-test]
+   [re-frame.core :as rf]
+   [renderer.app.events :as app.e]
+   [renderer.document.events :as document.e]
+   [renderer.element.events :as element.e]
+   [renderer.tool.events :as e]
+   [renderer.tool.hierarchy :as hierarchy]
+   [renderer.tool.impl.core]))
+
+(deftest edit
+  (rf-test/run-test-sync
+   (rf/dispatch [::app.e/initialize-db])
+   (rf/dispatch [::document.e/init])
+   (rf/dispatch [::e/activate :edit])
+
+   (is (= (hierarchy/render :edit) [:g ()]))
+
+   (rf/dispatch [::element.e/add {:tag :rect
+                                  :attrs {:width 100
+                                          :height 100}}])
+   (rf/dispatch [::e/activate :edit])
+
+   (is (not= (hierarchy/render :edit) [:g ()]))))