|
version 1.47, 2002/11/18 15:17:56
|
version 1.48, 2002/12/12 18:00:24
|
|
Line 278 sub traceroute {
|
Line 278 sub traceroute {
|
| $sofar=simplify($sofar); |
$sofar=simplify($sofar); |
| unless ($beenhere=~/\&$rid\&/) { |
unless ($beenhere=~/\&$rid\&/) { |
| $beenhere.=$rid.'&'; |
$beenhere.=$rid.'&'; |
| if (($retfurl eq '') && ($hash{'src_'.$rid})) { |
if (($retfurl eq '') && ($hash{'src_'.$rid}) |
| |
&& ($hash{'src_'.$rid}!~/\.sequence$/)) { |
| my ($mapid,$resid)=split(/\./,$rid); |
my ($mapid,$resid)=split(/\./,$rid); |
| $retfurl=$hash{'src_'.$rid}. |
$retfurl=$hash{'src_'.$rid}. |
| (($hash{'src_'.$rid}=~/\?/)?'&':'?').'symb='. |
(($hash{'src_'.$rid}=~/\?/)?'&':'?').'symb='. |
|
Line 492 sub readmap {
|
Line 493 sub readmap {
|
| &pickrandom(); |
&pickrandom(); |
| } |
} |
| # ------------------------------------------------------------ Version tracking |
# ------------------------------------------------------------ Version tracking |
| if (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) { |
# if (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) { |
| &Apache::lonnet::logthis('Will be version tracking'); |
# &Apache::lonnet::logthis('Will be version tracking'); |
| } |
# } |
| unless ((untie(%hash)) && (untie(%parmhash))) { |
unless ((untie(%hash)) && (untie(%parmhash))) { |
| &Apache::lonnet::logthis("<font color=blue>WARNING: ". |
&Apache::lonnet::logthis("<font color=blue>WARNING: ". |
| "Could not untie coursemap $fn for $uri.</font>"); |
"Could not untie coursemap $fn for $uri.</font>"); |
|
Line 522 sub readmap {
|
Line 523 sub readmap {
|
| $retfurl='/adm/email?critical=display'; |
$retfurl='/adm/email?critical=display'; |
| } |
} |
| } |
} |
| |
|
| |
|
| return ($retfurl,$errtext); |
return ($retfurl,$errtext); |
| } |
} |
| |
|
![[BACK]](/icons/back.gif){kind=icon}
Return to lonuserstate.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat