Support optional attrs in :>

Fix #10
rauhs · Feb 24, 2019 · 6f3df03 · 6f3df03
1 parent 3ae4f25
commit 6f3df03
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/src/hicada/compiler.clj b/src/hicada/compiler.clj
@@ -17,8 +17,13 @@
     [hicada.normalize :as norm]
     [hicada.util :as util]))
 
-(def default-handlers {:> (fn [_ klass attrs & children]
-                            [klass attrs children])
+(def default-handlers {:> (fn
+                            ([_ klass]
+                             [klass {} nil])
+                            ([_ klass attrs & children]
+                             (if (map? attrs)
+                               [klass attrs children]
+                               [klass {} (cons attrs children)])))
                        :* (fn [_ attrs & children]
                             (if (map? attrs)
                               ['js/React.Fragment attrs children]