Create persistent nodes in tests

This commit is contained in:
alesapin 2021-03-16 15:40:28 +03:00
parent 8cf8265d47
commit 63873f46bb
2 changed files with 3 additions and 5 deletions

View File

@ -22,13 +22,11 @@
(invoke! [this test op]
(case (:f op)
:read ;(try
(do (info "LIST ON NODE" nodename (zk-list conn "/"))
(info "EXISTS NODE" (zk/exists conn "/a-set"))
:read
(do
(assoc op
:type :ok
:value (read-string (:data (zk-get-str conn k)))))
;(catch Exception _ (assoc op :type :fail, :error :connect-error)))
:add (try
(do
(zk-add-to-set conn k (:value op))

View File

@ -61,7 +61,7 @@
(defn zk-create-if-not-exists
[conn path data]
(zk/create conn path :data (data/to-bytes (str data))))
(zk/create conn path :data (data/to-bytes (str data)) :persistent? true))
(defn clickhouse-alive?
[node test]