Change form-helper label and submit to take & args as kvs

swlkr · swlkr · commit 857582b694b4 · 2020-01-08T22:22:52.000-07:00
diff --git a/src/joy/form-helper.janet b/src/joy/form-helper.janet
@@ -22,13 +22,12 @@
         (hidden-field action :_method))]))
 
 
-(defn label [key &opt attrs]
-  (default attrs [:for (string key)])
+(defn label [key & args]
   (let [str (string key)]
-    [:label (merge {:for str :style "display: block;"} (apply table attrs)) str]))
+    [:label (merge {:for str :style "display: block;"} (table ;args))
+      str]))
 
 
-(defn submit [value &opt attrs]
-  (default attrs [])
-  [:input (merge {:type "submit" :value value :style "display: block"} (apply table attrs))])
+(defn submit [value & args]
+  [:input (merge {:type "submit" :value value :style "display: block"} (apply table args))])
 
