loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.640, 2017/09/05 00:56:42	version 1.641, 2017/11/10 15:47:49
Line 4104 END	Line 4104 END
}	}
}	}
if ($url ne '') {	if ($url ne '') {
$url.=(($url=~/\?/)?'&':'?').'symb='.&HTML::Entities::encode($shownsymb,'"<>&');	$url.=(($url=~/\?/)?'&':'?').'symb='.&escape($shownsymb);
}	}
} elsif (!$env{'request.role.adv'}) {	} elsif (!$env{'request.role.adv'}) {
my $checkencrypt;	my $checkencrypt;
Line 4125 END	Line 4125 END
my $shownsymb = &Apache::lonenc::encrypted($symb);	my $shownsymb = &Apache::lonenc::encrypted($symb);
my $shownurl = &Apache::lonenc::encrypted($url);	my $shownurl = &Apache::lonenc::encrypted($url);
if (&Apache::lonnet::symbverify($shownsymb,$shownurl)) {	if (&Apache::lonnet::symbverify($shownsymb,$shownurl)) {
$url = $shownurl.(($shownurl=~/\?/)?'&':'?').'symb='.&HTML::Entities::encode($shownsymb,'"<>&');	$url = $shownurl.(($shownurl=~/\?/)?'&':'?').'symb='.&escape($shownsymb);
if ($env{'request.enc'} ne '') {	if ($env{'request.enc'} ne '') {
delete($env{'request.enc'});	delete($env{'request.enc'});
}	}