[LON-CAPA-cvs] cvs: loncom /cgi clusterstatus.pl

[www]

www		Fri Aug 29 13:42:32 2003 EDT

  Modified files:              
    /loncom/cgi	clusterstatus.pl 
  Log:
  Better color contrast between "local_error" and "con_lost"
  
  
Index: loncom/cgi/clusterstatus.pl
diff -u loncom/cgi/clusterstatus.pl:1.19 loncom/cgi/clusterstatus.pl:1.20
--- loncom/cgi/clusterstatus.pl:1.19	Tue Aug 19 21:34:25 2003
+++ loncom/cgi/clusterstatus.pl	Fri Aug 29 13:42:32 2003
@@ -3,7 +3,7 @@
 # The LearningOnline Network with CAPA
 # Cluster Status
 #
-# $Id: clusterstatus.pl,v 1.19 2003/08/20 01:34:25 www Exp $
+# $Id: clusterstatus.pl,v 1.20 2003/08/29 17:42:32 www Exp $
 
 use lib '/home/httpd/lib/perl/';
 use LONCAPA::Configuration;
@@ -459,7 +459,7 @@
 		    print 
 '<td bgcolor="'.$cellcolor.'"><font color="#225522" face="arial"><b>ok</b></td>';
 		} else {
-		    my $cellcolor='#DDBBBB';
+		    my $cellcolor='#DDCCAA';
 		    if ($connectionstatus{$local.'_TO_'.$remote} eq 'local_error') {
 			if ($local eq $remote) { 
 			    $cellcolor='#DD88AA'; 
@@ -467,7 +467,7 @@
 			    $cellcolor='#DDAACC';
 			}
 		    } else {
-			if ($local eq $remote) { $cellcolor='#DD9999'; }
+			if ($local eq $remote) { $cellcolor='#DDBB77'; }
 		    }
 		    print 
 		  '<td bgcolor="'.$cellcolor.'"><font color="#552222" size="-2">'.