Index: openacs-4/packages/acs-templating/tcl/element-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/element-procs.tcl,v
diff -u -N -r1.25.6.6 -r1.25.6.7
--- openacs-4/packages/acs-templating/tcl/element-procs.tcl	6 Jun 2007 18:35:20 -0000	1.25.6.6
+++ openacs-4/packages/acs-templating/tcl/element-procs.tcl	7 Jun 2007 10:15:51 -0000	1.25.6.7
@@ -214,6 +214,9 @@
 
             array set fs_attributes $opts(fieldset)
             set fs_options ""
+            if {![info exists fs_attributes(class)]} {
+                append fs_options " class=\"form-fieldset\""
+            }
             foreach name [array names fs_attributes] {
                 if { [string equal $fs_attributes($name) {}] } {
                     append fs_options " $name"