loncom/interface/lonsearchcourse.pm - diff

Return to lonsearchcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonsearchcourse.pm between versions 1.6 and 1.8

version 1.6, 2020/09/22 12:19:15	version 1.8, 2024/02/11 20:32:42
Line 261 sub checkonthis {	Line 261 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);
.'?symb='.&Apache::lonenc::encrypted($symb);	if ($href =~ /\.sequence$/) {
	$href .= '?navmap=1';
	} else {
	$href .= '?symb='.&Apache::lonenc::encrypted($symb);
	}
} else {	} else {
$href.='?symb='.&escape($symb);	if ($href =~ /\.sequence$/) {
	$href .= '?navmap=1';
	} else {
	$href .= '?symb='.&escape($symb);
	}
}	}
$r->print('<a href="'.$href.'" target="cat">'.($title?$title:$url).	$r->print('<a href="'.$href.'" target="cat">'.($title?$title:$url).
'</a><br />');	'</a><br />');
Line 331 sub handler {	Line 339 sub handler {
&Apache::lonnavdisplay::startContentScreen($r,'coursesearch');	&Apache::lonnavdisplay::startContentScreen($r,'coursesearch');
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};	my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};	my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
	my $clientip = &Apache::lonnet::get_requestor_ip($r);
my ($blocked,$blocktext) =	my ($blocked,$blocktext) =
&Apache::loncommon::blocking_status('search',$cnum,$cdom);	&Apache::loncommon::blocking_status('search',$clientip,$cnum,$cdom);
if ($blocked) {	if ($blocked) {
my $checkrole = "cm./$cdom/$cnum";	my $checkrole = "cm./$cdom/$cnum";
if ($env{'request.course.sec'} ne '') {	if ($env{'request.course.sec'} ne '') {

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.6
changed lines
	Added in v.1.8