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

[www]

www		Wed Nov 10 11:22:26 2004 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  Bug #3014: Mail checking also on Roles screen
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.122 loncom/interface/lonmenu.pm:1.123
--- loncom/interface/lonmenu.pm:1.122	Tue Nov  2 16:02:01 2004
+++ loncom/interface/lonmenu.pm	Wed Nov 10 11:22:25 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.122 2004/11/02 21:02:01 albertel Exp $
+# $Id: lonmenu.pm,v 1.123 2004/11/10 16:22:25 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -920,7 +920,11 @@
     unless (($ENV{'browser.interface'} eq 'textual') ||
             ($ENV{'environment.remote'} eq 'off')) {
        $output.="\nwindow.status='Synchronizing Time';swmenu.syncclock(1000*".time.");\nwindow.status='Remote Control Configured.';";
+       if (&Apache::lonmsg::newmail()) { 
+	   $output.='swmenu.setstatus("you have","messages");';
+       }
     }
+
     return $output;
 }