Separate name and id for radio buttons. Needed for good Javascript addressing.

Author: mtnygard

src/compojure/html/form_helpers.clj

@@ -68,14 +68,14 @@
 
 (defn radio-button
  "Creates a radio button."
- ([name]
-    (radio-button name (*params* name)))
- ([name checked?]
-    (radio-button name checked? "true"))
- ([name checked? value]
+ ([id]
+    (radio-button id (*params* id)))
+ ([id checked?]
+    (radio-button id checked? "true"))
+ ([id checked? value]
     [:input {:type    "radio"
-             :name    (str* name)
-             :id      (str* name)
+             :name    (str* id "_" value)
+             :id      (str* id)
              :value   value
              :checked checked?}]))
 

test/compojure/html/form_helpers.clj

@@ -35,15 +35,15 @@
   (is (= (radio-button :foo)
          [:input {:type "radio"
                   :id "foo"
-                  :name "foo"
+                  :name "foo_true"
                   :value "true"
                   :checked nil}])))
 
 (deftest test-radio-button-selected
   (is (= (radio-button :foo true "abcdef")
          [:input {:type "radio"
                   :id "foo"
-                  :name "foo"
+                  :name "foo_abcdef"
                   :value "abcdef"
                   :checked true}])))