loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.199, 2023/09/13 12:18:13	version 1.200, 2023/09/15 22:32:46
Line 2504 sub displaymessage {	Line 2504 sub displaymessage {
$showsymb,$env{'user.domain'},$env{'user.name'});	$showsymb,$env{'user.domain'},$env{'user.name'});
if ($symb) {	if ($symb) {
if ($encrypturl =~ /^yes$/i && !$env{'request.role.adv'}) {	if ($encrypturl =~ /^yes$/i && !$env{'request.role.adv'}) {
$showsymb = &Apache::lonenc::check_encrypt($symb);	unless ($showsymb =~ m{^/enc/}) {
	$showsymb = &Apache::lonenc::encrypted($showsymb);
	}
}	}
$symblink = '?symb='.$showsymb;	$symblink = '?symb='.$showsymb;
}	}
if ($encrypturl =~ /^yes$/i && !$env{'request.role.adv'}) {	if ($encrypturl =~ /^yes$/i && !$env{'request.role.adv'}) {
$showurl = $baseurl;	unless ($showurl =~ m{^/enc/}) {
	$showurl = &Apache::lonenc::encrypted($showurl);
	}
}	}
$r->print(&Apache::lonhtmlcommon::row_title(&mt('Refers to'))	$r->print(&Apache::lonhtmlcommon::row_title(&mt('Refers to'))
.'<a href="'.$showurl.$symblink.'">'.$restitle.'</a>'	.'<a href="'.$showurl.$symblink.'">'.$restitle.'</a>'