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

[www]

www		Fri Aug 15 10:55:45 2003 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  Do this instead of 1.39 of lonpageflip.pm
  Also fixes problems with PRT of "special filename" documents, and fixes
  NAV location info.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.83 loncom/interface/lonmenu.pm:1.84
--- loncom/interface/lonmenu.pm:1.83	Fri Aug 15 09:25:28 2003
+++ loncom/interface/lonmenu.pm	Fri Aug 15 10:55:45 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.83 2003/08/15 13:25:28 www Exp $
+# $Id: lonmenu.pm,v 1.84 2003/08/15 14:55:45 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -377,6 +377,7 @@
 ENDREGTEXT
 # Registered, graphical output
         } else {
+	    my $requri=&Apache::lonnet::unescape($ENV{'REQUEST_URI'});
 	    $result = (<<ENDREGTHIS);
      
 <script language="JavaScript">
@@ -389,8 +390,8 @@
           $timesync
           $newmail
           $buttons
-	  swmenu.currentURL=window.location.pathname;
-          swmenu.reloadURL=window.location.pathname+window.location.search;
+	  swmenu.currentURL="$requri";
+          swmenu.reloadURL=currentURL+window.location.search;
           swmenu.currentSymb="$ENV{'request.symb'}";
           swmenu.reloadSymb="$ENV{'request.symb'}";
           swmenu.currentStale=0;