rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.89, 2005/04/07 06:56:27	version 1.90, 2005/05/05 20:43:28
Line 338 sub traceroute {	Line 338 sub traceroute {
my ($mapid,$resid)=split(/\./,$rid);	my ($mapid,$resid)=split(/\./,$rid);
my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$hash{'src_'.$rid});	my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$hash{'src_'.$rid});
my $hidden=&Apache::lonnet::EXT('resource.0.hiddenresource',$symb);	my $hidden=&Apache::lonnet::EXT('resource.0.hiddenresource',$symb);
if ($hdnflag \|\| lc($hidden) eq 'yes') { $hiddenurl{$rid}=1; }	if ($hdnflag \|\| lc($hidden) eq 'yes') {
	$hiddenurl{$rid}=1;
	} else {
	# shouldn't be hidden, but might have had a parm set on it
	# saying to
	delete($hiddenurl{$rid});
	}
my $encrypt=&Apache::lonnet::EXT('resource.0.encrypturl',$symb);	my $encrypt=&Apache::lonnet::EXT('resource.0.encrypturl',$symb);
if ($encflag \|\| lc($encrypt) eq 'yes') { $encurl{$rid}=1; }	if ($encflag \|\| lc($encrypt) eq 'yes') { $encurl{$rid}=1; }
if (($retfurl eq '') && ($hash{'src_'.$rid})	if (($retfurl eq '') && ($hash{'src_'.$rid})