loncom/interface/loncreatecourse.pm - diff

Return to loncreatecourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.164, 2016/10/06 16:20:05	version 1.166, 2017/08/07 20:22:13
Line 106 sub print_course_creation_page {	Line 106 sub print_course_creation_page {
$course_home .= qq{>$server $host_servers{$server}</option>};	$course_home .= qq{>$server $host_servers{$server}</option>};
}	}
$course_home .= "\n</select>\n";	$course_home .= "\n</select>\n";
my $domform = &Apache::loncommon::select_dom_form($defdom,'ccdomain');	my ($trustedref,$untrustedref) = &Apache::lonnet::trusted_domains('enroll',$defdom);
	my $domform = &Apache::loncommon::select_dom_form($defdom,'ccdomain',undef,undef,undef,$trustedref,$untrustedref);
my $cloneform=&Apache::loncommon::select_dom_form	my $cloneform=&Apache::loncommon::select_dom_form
($env{'request.role.domain'},'clonedomain').	($env{'request.role.domain'},'clonedomain').
&Apache::loncommon::selectcourse_link	&Apache::loncommon::selectcourse_link
Line 1416 sub handler {	Line 1417 sub handler {
}	}
$r->print($start_page.$crumbs."\n".'<div>'.	$r->print($start_page.$crumbs."\n".'<div>'.
&Apache::loncoursequeueadmin::display_queued_requests(	&Apache::loncoursequeueadmin::display_queued_requests(
$context,$env{'request.role.domain'},undef,).'</div>'.	$context,$env{'request.role.domain'}).'</div>'.
&Apache::loncommon::end_page());	&Apache::loncommon::end_page());
} elsif (($permission->{'create'}) &&	} elsif (($permission->{'create'}) &&
($env{'form.phase'} eq 'requestchange') && ($show_all_choices)) {	($env{'form.phase'} eq 'requestchange') && ($show_all_choices)) {