瀏覽代碼

test(undo): update-block-op add more attrs

rcmerci 1 年之前
父節點
當前提交
f0275db47d
共有 1 個文件被更改,包括 10 次插入5 次删除
  1. 10 5
      src/test/frontend/worker/undo_redo_test.cljs

+ 10 - 5
src/test/frontend/worker/undo_redo_test.cljs

@@ -60,11 +60,16 @@
 
 (defn- gen-update-block-op
   [db]
-  (gen/let [block-uuid (gen-block-uuid db)
-            content gen/string-alphanumeric]
-    [:frontend.worker.undo-redo/update-block
-     {:block-uuid block-uuid
-      :block-origin-content content}]))
+  (let [gen-content-attr (gen/let [content gen/string-alphanumeric]
+                           [:block-origin-content content])
+        gen-collapsed-attr (gen/let [v gen/boolean]
+                             [:block-origin-collapsed v])
+        gen-tags-attr (gen/let [tags (gen/vector (gen-block-uuid db))]
+                        [:block-origin-tags tags])]
+    (gen/let [block-uuid (gen-block-uuid db)
+              attrs (gen/vector (gen/one-of [gen-content-attr gen-collapsed-attr gen-tags-attr]) 3)]
+      [:frontend.worker.undo-redo/update-block
+       (into {:block-uuid block-uuid} attrs)])))
 
 (def ^:private gen-boundary (gen/return [:frontend.worker.undo-redo/boundary]))