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

[www]

www		Thu Apr 17 09:21:36 2003 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  Inline Remote: show where we are.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.59 loncom/interface/lonmenu.pm:1.60
--- loncom/interface/lonmenu.pm:1.59	Sat Apr 12 11:57:30 2003
+++ loncom/interface/lonmenu.pm	Thu Apr 17 09:21:36 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.59 2003/04/12 15:57:30 www Exp $
+# $Id: lonmenu.pm,v 1.60 2003/04/17 13:21:36 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -203,6 +203,11 @@
     my $reopen=&Apache::lonmenu::reopenmenu();
 
     my $newmail='';
+    if (($textual) && ($ENV{'request.symb'})) {
+	my ($mapurl,$rid,$resurl)=split(/\_\_\_/,$ENV{'request.symb'});
+        $newmail=&Apache::lonnet::gettitle($mapurl).': '.
+	         &Apache::lonnet::gettitle($resurl).'   ';
+    }
     if (&Apache::lonmsg::newmail()) { 
        $newmail=($textual?
  '<b><a href="/adm/communicate">You have new messages</a></b><br />':