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.32.6.1 -r1.32.6.2
--- openacs-4/packages/acs-templating/tcl/form-procs.tcl	13 Feb 2007 08:23:25 -0000	1.32.6.1
+++ openacs-4/packages/acs-templating/tcl/form-procs.tcl	17 Feb 2007 23:28:55 -0000	1.32.6.2
@@ -513,6 +513,12 @@
   set output "<form name=\"$id\" method=\"$properties(method)\" 
                     action=\"$properties(action)\""
 
+  ### 2/17/2007
+  ### Adding a default class for forms if one does not exist 
+  if {![info exists attributes(class)]} {
+      append output " class=\"margin-form\""
+  }
+
   # append attributes to form tag
   foreach name [array names attributes] {
     if { [string equal $attributes($name) {}] } {