Index: openacs-4/packages/dotlrn/www/dotlrn-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/dotlrn/www/dotlrn-master.tcl	24 Oct 2002 13:22:05 -0000	1.11
+++ openacs-4/packages/dotlrn/www/dotlrn-master.tcl	7 Nov 2002 13:13:27 -0000	1.12
@@ -120,10 +120,11 @@
     set navbar "<br>"
 }
 
-
 # the ColorHack and FontHack and LogoHack!
 set color_hack "#cc0000"
 set color_hack_name "red"
+set color_1pixel "/shared/1pixel.tcl?[export_vars { { r 204 } { g 0 } { b 0 }}]"
+
 set header_font ""
 set header_font_size "medium"
 set header_font_color "black"
@@ -152,15 +153,18 @@
     if {[dotlrn_community::subcommunity_p -community_id $community_id]} {
         set color_hack "#663366"
         set color_hack_name "purple"
+        set color_1pixel "/shared/1pixel.tcl?[export_vars { { r 153 } { g 102 } { b 153 }}]"
     } else {
         set comm_type \
                 [dotlrn_community::get_community_type_from_community_id $community_id]
         if {$comm_type == "dotlrn_club"} {
             set color_hack "#006666"
             set color_hack_name "green"
+            set color_1pixel "/shared/1pixel.tcl?[export_vars { { r 0 } { g 102 } { b 102 }}]"
         } else {
             set color_hack "#6699cc"
             set color_hack_name "blue"
+            set color_1pixel "/shared/1pixel.tcl?[export_vars { { r 102 } { g 153 } { b 204 }}]"
         }
     }