![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl|
Return to lonnet.pm CVS log | Up to [LON-CAPA] / loncom / lonnet / perl |
| version 1.379, 2003/06/11 14:41:24 | version 1.380, 2003/06/17 01:38:14 |
|---|---|
| Line 1643 sub tmpreset { | Line 1643 sub tmpreset { |
| my ($symb,$namespace,$domain,$stuname) = @_; | my ($symb,$namespace,$domain,$stuname) = @_; |
| if (!$symb) { | if (!$symb) { |
| $symb=&symbread(); | $symb=&symbread(); |
| if (!$symb) { $symb= $ENV{'REQUEST_URI'}; } | if (!$symb) { $symb= $ENV{'request.url'}; } |
| } | } |
| $symb=escape($symb); | $symb=escape($symb); |