Index: openacs-4/packages/forums/www/message-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-chunk.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/forums/www/message-chunk.tcl	5 Jun 2002 19:25:37 -0000	1.2
+++ openacs-4/packages/forums/www/message-chunk.tcl	30 Jul 2002 22:04:59 -0000	1.3
@@ -2,7 +2,10 @@
     
     a message chunk to be included in a table listing of messages
 
+    _so that has to be wrapped in a <table>_
+
     @author yon (yon@openforce.net)
+    @author arjun (arjun@openforce.net)
     @creation-date 2002-06-02
     @version $Id$
 
@@ -11,6 +14,12 @@
 if {![array exists message]} {
     ad_return_complaint 1 "Need to provide a message to display."
 }
-if {![exists_and_not_null bgcolor]} { set bgcolor "#ffffff" }
+
+if {![exists_and_not_null bgcolor]} { 
+    set table_bgcolor [parameter::get -parameter table_bgcolor]
+} else {
+    set table_bgcolor $bgcolor
+}
+
 if {![exists_and_not_null moderate_p]} { set moderate_p 0 }
 if {![exists_and_not_null forum_moderated_p]} {set forum_moderated_p 0}