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

[albertel]

albertel		Sat Apr 22 13:17:49 2006 EDT

  Modified files:              
    /loncom/interface	lonmsgdisplay.pm loncommon.pm 
  Log:
  - adding LC_error and LC_success classes
  
  
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.4 loncom/interface/lonmsgdisplay.pm:1.5
--- loncom/interface/lonmsgdisplay.pm:1.4	Sat Apr 22 13:10:07 2006
+++ loncom/interface/lonmsgdisplay.pm	Sat Apr 22 13:17:49 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging display
 #
-# $Id: lonmsgdisplay.pm,v 1.4 2006/04/22 17:10:07 albertel Exp $
+# $Id: lonmsgdisplay.pm,v 1.5 2006/04/22 17:17:49 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -313,7 +313,7 @@
 
 sub discrit {
     my $r=shift;
-    my $header = '<h1><font color=red>'.&mt('Critical Messages').'</font></h1>'.
+    my $header = '<h1><font color="red">'.&mt('Critical Messages').'</font></h1>'.
         '<form action="/adm/email" method="POST">'.
         '<input type="hidden" name="confirm" value="true" />';
     my %what=&Apache::lonnet::dump('critical');
@@ -1767,17 +1767,15 @@
 	&printheader($r,'','No messages sent.'); 
     }
     if ($sendstatus=~/^(\s*(?:ok|con_delayed)\s*)*$/) {
-	$r->print('<br /><font color="green">'.&mt('Completed.').'</font>');
+	$r->print('<br /><span class="LC_success">'.&mt('Completed.').'</span>');
 	if ($env{'form.displayedcrit'}) {
 	    &discrit($r);
 	} else {
 	    &Apache::loncommunicate::menu($r);
 	}
     } else {
-	$r->print(
-		  '<h2><font color="red">'.&mt('Could not deliver message').'</font></h2>'.
-		  &mt('Please use the browser "Back" button and correct the recipient addresses')
-		  );
+	$r->print('<p><span class="LC_error">'.&mt('Could not deliver message').'</span> '.
+		  &mt('Please use the browser "Back" button and correct the recipient addresses').'</p>');
     }
 }
 
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.349 loncom/interface/loncommon.pm:1.350
--- loncom/interface/loncommon.pm:1.349	Sat Apr 22 13:10:07 2006
+++ loncom/interface/loncommon.pm	Sat Apr 22 13:17:49 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.349 2006/04/22 17:10:07 albertel Exp $
+# $Id: loncommon.pm,v 1.350 2006/04/22 17:17:49 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3078,6 +3078,13 @@
 form, .inline { display: inline; }
 .center { text-align: center; }
 .filename {font-family: monospace;}
+.LC_error {
+  color: red;
+  font-size: larger;
+}
+.LC_success {
+  color: green;
+}
 
 table#LC_top_nav, table#LC_menubuttons, table#LC_nav_location {
   width: 100%;