Index: openacs-4/packages/acs-templating/tcl/form-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/form-procs.tcl,v diff -u -r1.41 -r1.42 --- openacs-4/packages/acs-templating/tcl/form-procs.tcl 7 Jun 2008 20:28:59 -0000 1.41 +++ openacs-4/packages/acs-templating/tcl/form-procs.tcl 4 Jan 2010 22:49:12 -0000 1.42 @@ -423,9 +423,6 @@ # fieldset attributes set properties(sec_fieldset) "" array set fs_attributes $fieldset - if {![info exists fs_attributes(class)]} { - append properties(sec_fieldset) " class=\"form-fieldset\"" - } foreach name [array names fs_attributes] { if {$fs_attributes($name) eq {}} { append properties(sec_fieldset) " $name" @@ -438,6 +435,9 @@ set properties(sec_legend) "" if { $legendtext ne "" } { array set lg_attributes $legend + if {![info exists lg_attributes(class)]} { + append properties(sec_legend) " class=\"bold\"" + } foreach name [array names lg_attributes] { if {$lg_attributes($name) eq {}} { append properties(sec_legend) " $name"