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.9, 2024/02/11 20:40:37
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),