@@ -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?}])) src/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}]))) test/compojure/html/form_helpers.clj 87cb616790d3bd41b4b08367a0f00547dd0b3027 Michael Nygard michael.nygard@n6consulting.com http://github.com/abedra/compojure/commit/1361dc3c7f33e74abc8e2900a5317518fac06df7 1361dc3c7f33e74abc8e2900a5317518fac06df7 2009-10-24T05:47:49-07:00 2009-10-23T14:33:29-07:00 Make the radiobutton IDs vary, but keep the names the same. 26c090feb58e5f97c671ed92dce20dcffe9db5b5 James Reeves jreeves@weavejester.com