adjust to the "return a hickup vector" convention

src/main/cljs/dda/c4k_shynet/browser.cljs

@@ -14,7 +14,7 @@
 (defn generate-group
   [name
    content]
-  {:type :element
+  [{:type :element
     :tag :div
     :attrs {:class "rounded border border-3  m-3 p-2"}
     :content [{:type :element
@@ -23,14 +23,14 @@
                :content name}
               {:type :element
                :tag :fieldset
-              :content content}]})
+               :content content}]}])
 
 (defn generate-content []
   (concat-vec
    [(assoc
      (br/generate-needs-validation) :content
      (concat-vec
-      [(generate-group
+      (generate-group
        "domain"
        (concat-vec
         (br/generate-input-field "fqdn" "Your fqdn:" "shynet.prod.meissa-gmbh.de")
@@ -47,7 +47,7 @@
         "{:postgres-db-user \"shynet\"
 :postgres-db-password \"shynet-db-password\"
 :django-secret-key \"djangosecretkey\"}"
-         "5"))]
+        "5"))
       [(br/generate-br)]
       (br/generate-button "generate-button" "Generate c4k yaml")))]
    (br/generate-output "c4k-shynet-output" "Your c4k deployment.yaml:" "25")))

src/test/cljc/dda/c4k_shynet/browser_test.cljc

@@ -7,5 +7,5 @@
 
 (deftest should-generate-group
   (is (= "<div class=\"rounded border border-3  m-3 p-2\"><b style=\"z-index: 1; position: relative; top: -1.3rem;\">id1</b><fieldset>content</fieldset></div>"
-         (hr/hickory-to-html
+         (apply hr/hickory-to-html
           (cut/generate-group "id1" "content")))))