[LON-CAPA-cvs] cvs: loncom /interface lonindexer.pm

[ng]

ng		Thu Jun 20 17:22:20 2002 EDT

  Modified files:              
    /loncom/interface	lonindexer.pm 
  Log:
  Change outline color for table listing of resources.
  
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.43 loncom/interface/lonindexer.pm:1.44
--- loncom/interface/lonindexer.pm:1.43	Thu Jun 13 11:05:16 2002
+++ loncom/interface/lonindexer.pm	Thu Jun 20 17:22:20 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.43 2002/06/13 15:05:16 matthew Exp $
+# $Id: lonindexer.pm,v 1.44 2002/06/20 21:22:20 ng Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -379,7 +379,7 @@
 	
 # ---------------------------------------------------------------- output title
 	$r->print(
-'<h2><font color="#888888">The Learning<i>Online</i> Network with CAPA '.
+'<h2><font color="#339933">The Learning<i>Online</i> Network with CAPA '.
 		  'Network Directory Browser</font></h2>'."\n");
 # ---------------------------------- get state of file attributes to be showing
 	if ($ENV{'form.attrs'} ne "") {
@@ -425,7 +425,7 @@
 #        $r->print(&initdebug());
 #        $r->print(&writedebug("Omit:@Omit")) if (@Omit);
 #        $r->print(&writedebug("Only:@Only")) if (@Only);
-        $r->print("<table width='100\%' border=0><tr><td bgcolor=#eeeeee>\n");
+        $r->print("<table width='100\%' border=0><tr><td bgcolor=#990404>\n");
 	$r->print("<table width='100\%' border=0><tr>\n");
 	$r->print("<td $colspan bgcolor=$titleclr><b>Name</b></td>\n");
 	$r->print("<td bgcolor=$titleclr align=right><b>Size (bytes) ".