loncom/interface/loncreatecourse.pm - diff

Return to loncreatecourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.113, 2008/12/15 08:11:32	version 1.114, 2009/01/16 12:32:30
Line 763 sub create_course {	Line 763 sub create_course {
# Make the requested user a course coordinator or group coordinator	# Make the requested user a course coordinator or group coordinator
#	#
if (($ccdomain) && ($ccuname)) {	if (($ccdomain) && ($ccuname)) {
$r->print(&mt('Assigning role of [_1] Coordinator to [_2] at [_3]: ',	$r->print(&mt('Assigning role of '.$crstype.' Coordinator to [_1]:',
$crstype,$ccuname,$ccdomain).	,'<i>'.$ccuname.':'.$ccdomain.'</i>')
&Apache::lonnet::assignrole($ccdomain,$ccuname,$courseid,	.&Apache::lonnet::assignrole($ccdomain,$ccuname,$courseid,
'cc','','','','','createcourse').'<p>');	'cc','','','','','createcourse').'<p>');
}	}
if ($env{'form.setkeys'}) {	if ($env{'form.setkeys'}) {
Line 777 sub create_course {	Line 777 sub create_course {
$r->print('<p>'.&mt('Roles will be active at next login').'.</p>');	$r->print('<p>'.&mt('Roles will be active at next login').'.</p>');
}	}
$r->print('<p><a href="/adm/createcourse?phase='.lc($crstype).'one">'.	$r->print('<p><a href="/adm/createcourse?phase='.lc($crstype).'one">'.
&mt('Create Another [_1]',$crstype).'</a></p>'.	&mt("Create Another $crstype").'</a></p>'.
&Apache::loncommon::end_page());	&Apache::loncommon::end_page());
}	}