From e3519291b23972f1857bbee5092ffd34eea6cc71 Mon Sep 17 00:00:00 2001
From: Asko Nõmm <asko@nmm.ee>
Date: Sun, 19 Oct 2025 15:38:55 +0300
Subject: Fix an issue where a sequence of nodes created with the `$` helper
 would break.

---
 src/dompa/nodes.cljc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/dompa/nodes.cljc b/src/dompa/nodes.cljc
index 236271d..8600026 100644
--- a/src/dompa/nodes.cljc
+++ b/src/dompa/nodes.cljc
@@ -92,7 +92,7 @@
   [name & args-and-elements]
   (let [[args & elements] args-and-elements]
     `(defn ~name ~args
-       (->html [~@elements]))))
+       (->html (vector ~@elements)))))
 
 (defn $
   "Creates a new node
@@ -114,4 +114,4 @@
           children (if attrs? (rest opts) opts)]
       (cond-> {:node/name name}
         attrs? (assoc :node/attrs attrs)
-        (seq children) (assoc :node/children children)))))
+        (seq children) (assoc :node/children (flatten children))))))
-- 
cgit v1.2.3