[LON-CAPA-cvs] cvs: loncom /lonnet/perl lonnet.pm

[albertel]

albertel		Mon Jun 16 21:38:14 2003 EDT

  Modified files:              
    /loncom/lonnet/perl	lonnet.pm 
  Log:
  - fixes BUG#1641, was using a different variable to get the resource URL in tmpreset versus tmpstore and tmprestore.
  
  
Index: loncom/lonnet/perl/lonnet.pm
diff -u loncom/lonnet/perl/lonnet.pm:1.379 loncom/lonnet/perl/lonnet.pm:1.380
--- loncom/lonnet/perl/lonnet.pm:1.379	Wed Jun 11 10:41:24 2003
+++ loncom/lonnet/perl/lonnet.pm	Mon Jun 16 21:38:14 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.379 2003/06/11 14:41:24 matthew Exp $
+# $Id: lonnet.pm,v 1.380 2003/06/17 01:38:14 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1643,7 +1643,7 @@
   my ($symb,$namespace,$domain,$stuname) = @_;
   if (!$symb) {
     $symb=&symbread();
-    if (!$symb) { $symb= $ENV{'REQUEST_URI'}; }
+    if (!$symb) { $symb= $ENV{'request.url'}; }
   }
   $symb=escape($symb);