Index: openacs-4/www/blank-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/www/blank-master.tcl,v
diff -u -r1.43 -r1.44
--- openacs-4/www/blank-master.tcl	25 Jan 2008 21:43:50 -0000	1.43
+++ openacs-4/www/blank-master.tcl	8 May 2008 01:35:58 -0000	1.44
@@ -79,15 +79,22 @@
 # be done in acs-templating.
 
 #
-# Add standard css
-#
-template::head::add_css \
-    -href "/resources/acs-templating/lists.css" \
-    -media "all"
+# Add css for the current subsite, defaulting to the old list/form css which was
+# hard-wired in previous versions of OpenACS.
 
-template::head::add_css \
-    -href "/resources/acs-templating/forms.css" \
-    -media "all"
+set css [parameter::get -package_id [ad_conn subsite_id] -parameter ThemeCSS -default ""]
+if { $css ne "" } {
+    foreach css $css {
+        template::head::add_css -href [lindex $css 0] -media [lindex $css 1]
+    }
+} else {
+    template::head::add_css \
+        -href "/resources/acs-templating/lists.css" \
+        -media "all"
+    template::head::add_css \
+        -href "/resources/acs-templating/forms.css" \
+        -media "all"
+}
 
 #
 # Temporary (?) fix to get xinha working