version 1.33, 2002/07/07 17:52:20
|
version 1.35, 2002/07/25 16:55:53
|
Line 277 sub traceroute {
|
Line 277 sub traceroute {
|
$sofar=simplify($sofar); |
$sofar=simplify($sofar); |
unless ($beenhere=~/\&$rid\&/) { |
unless ($beenhere=~/\&$rid\&/) { |
$beenhere.=$rid.'&'; |
$beenhere.=$rid.'&'; |
if ($retfurl eq '') { |
if (($retfurl eq '') && ($hash{'src_'.$rid})) { |
my ($mapid,$resid)=split(/\./,$rid); |
my ($mapid,$resid)=split(/\./,$rid); |
$retfurl=$hash{'src_'.$rid}.'?symb='. |
$retfurl=$hash{'src_'.$rid}. |
|
(($hash{'src_'.$rid}=~/\?/)?'&':'?').'symb='. |
&Apache::lonnet::symbclean( |
&Apache::lonnet::symbclean( |
&Apache::lonnet::declutter($hash{'map_id_'.$mapid}). |
&Apache::lonnet::declutter($hash{'map_id_'.$mapid}). |
'___'.$resid.'___'. |
'___'.$resid.'___'. |