Make the radiobutton IDs vary, but keep the names the same.

Author: mtnygard

src/compojure/html/form_helpers.clj

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

test/compojure/html/form_helpers.clj

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