Index: openacs-4/packages/acs-tcl/tcl/table-display-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/table-display-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/acs-tcl/tcl/table-display-procs.tcl 11 Mar 2008 15:33:26 -0000 1.15
+++ openacs-4/packages/acs-tcl/tcl/table-display-procs.tcl 7 Jun 2008 20:28:58 -0000 1.16
@@ -189,12 +189,12 @@
-Tcolumns {}
-Taudit {}
-Trows_per_band 1
- -Tband_colors {{} {"#ececec"}}
+ -Tband_colors {{} "#ececec"}
-Tband_classes {{even} {odd}}
-Trows_per_page 0
-Tmax_rows 0
-Ttable_extra_html {cellpadding=3 cellspacing=0 class="table-display"}
- -Theader_row_extra {bgcolor="#f8f8f8" class="table-header"}
+ -Theader_row_extra {style="background-color:#f8f8f8" class="table-header"}
-Ttable_break_html "
"
-Tpre_row_code {}
-Trow_code {[subst $Trow_default]}
@@ -442,7 +442,7 @@
# do this check since we would like the ability to band with
# page background as well
if {$Tn_bands && ![empty_string_p [lindex $Tband_colors $Tband_color]]} {
- append Trow_default " bgcolor=[lindex $Tband_colors $Tband_color]"
+ append Trow_default " style=\"background-color:[lindex $Tband_colors $Tband_color]\""
}
if {$Tn_band_classes && ![empty_string_p [lindex $Tband_classes $Tband_class]]} {
append Trow_default " class=\"[lindex $Tband_classes $Tband_class]\""