loncom/interface/selfenroll.pm - diff

Return to selfenroll.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.27.2.8, 2021/12/14 12:53:12	version 1.36, 2021/05/04 18:47:36
Line 350 sub enrollment_limit_check {	Line 350 sub enrollment_limit_check {
sub page_header {	sub page_header {
my ($r,$courseid,$js,$desc) = @_;	my ($r,$courseid,$js,$desc) = @_;
my $start_page =	my $start_page =
&Apache::loncommon::start_page('Self-enroll in a LON-CAPA course',$js,	&Apache::loncommon::start_page('Self-enroll in a LON-CAPA course',$js);
{'no_inline_link' => 1,});
$r->print($start_page);	$r->print($start_page);
&Apache::lonhtmlcommon::clear_breadcrumbs();	&Apache::lonhtmlcommon::clear_breadcrumbs();
&Apache::createaccount::selfenroll_crumbs($r,$courseid,$desc);	&Apache::createaccount::selfenroll_crumbs($r,$courseid,$desc);
Line 795 sub check_registered {	Line 794 sub check_registered {
'internal.sectionnums',	'internal.sectionnums',
'internal.crosslistings'],$cdom,$cnum);	'internal.crosslistings'],$cdom,$cnum);
my (@allcourses,%LC_code,%affiliates,%reply);	my (@allcourses,%LC_code,%affiliates,%reply);
&Apache::loncommon::get_institutional_codes($cdom,$cnum,\%settings,\@allcourses,\%LC_code);	&Apache::loncommon::get_institutional_codes(\%settings,\@allcourses,\%LC_code);
if (@allcourses > 0) {	if (@allcourses > 0) {
@{$affiliates{$cnum}} = @allcourses;	@{$affiliates{$cnum}} = @allcourses;
my $outcome = &Apache::lonnet::fetch_enrollment_query('updatenow',\%affiliates,\%reply,$cdom,$cnum);	my $outcome = &Apache::lonnet::fetch_enrollment_query('updatenow',\%affiliates,\%reply,$cdom,$cnum);