loncom/interface/lonsearchcourse.pm - diff

Return to lonsearchcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.8, 2024/02/11 20:32:42	version 1.10, 2024/02/11 21:41:48
Line 136 sub course_search {	Line 136 sub course_search {
foreach (sort(keys(%hash))) {	foreach (sort(keys(%hash))) {
if ($c->aborted()) { last; }	if ($c->aborted()) { last; }
if (($_=~/^src\_(.+)$/)) {	if (($_=~/^src\_(.+)$/)) {
if ($hash{'randomout_'.$1} & !$env{'request.role.adv'}) {	my $rid = $1;
next;	unless ($env{'request.role.adv'}) {
	next if ($hash{'randomout_'.$rid} \|\| $hash{'deeplinkout_'.$rid});
	if (!$env{'request.deeplink.login'} && $hash{'deeplinkonly_'.$rid}) {
	my ($value) = map { &unescape($_); } split(/:/,$hash{'deeplinkonly_'.$rid});
	my ($state,$others,$listed) = split(/,/,$value);
	next if (($state eq 'only') &&
	(($listed eq 'absent') \|\| ($listed eq 'grades')));
	}
}	}
my $symb=&make_symb($1);	my $symb=&make_symb($1);
&checkonthis($r,$1,$hash{$_},0,&Apache::lonnet::gettitle($symb),	&checkonthis($r,$1,$hash{$_},0,&Apache::lonnet::gettitle($symb),
Line 262 sub checkonthis {	Line 269 sub checkonthis {
my $href=$url;	my $href=$url;
if ($hash{'encrypted_'.$id} && !$env{'request.role.adv'}) {	if ($hash{'encrypted_'.$id} && !$env{'request.role.adv'}) {
$href=&Apache::lonenc::encrypted($href);	$href=&Apache::lonenc::encrypted($href);
if ($href =~ /\.sequence$/) {	if ($url =~ /\.sequence$/) {
$href .= '?navmap=1';	$href .= '?navmap=1';
} else {	} else {
$href .= '?symb='.&Apache::lonenc::encrypted($symb);	$href .= '?symb='.&Apache::lonenc::encrypted($symb);