version 1.115, 2006/05/09 15:09:27
|
version 1.116, 2006/05/09 17:21:13
|
Line 235 sub user_modification_js {
|
Line 235 sub user_modification_js {
|
else { |
else { |
sections = document.cu.elements[i+1].value; |
sections = document.cu.elements[i+1].value; |
} |
} |
var newsecs = document.cu.elements[i+1].value; |
var newseclist = document.cu.elements[i+1].value; |
if (newsecs != null && newsecs != "") { |
var newsecs = new Array(); |
var numsplit = newsecs.split(/,/g); |
if (newseclist != null && newseclist != "") { |
numsec = numsec + numsplit.length; |
newsecs = newseclist.split(/,/g); |
|
numsec = numsec + newsecs.length; |
} |
} |
if ((role == 'st') && (numsec > 1)) { |
if ((role == 'st') && (numsec > 1)) { |
alert("In each course, each user may only have one student role at a time. You had selected "+numsec+" sections.\\nPlease modify your selections so they include no more than one section.") |
alert("In each course, each user may only have one student role at a time. You had selected "+numsec+" sections.\\nPlease modify your selections so they include no more than one section.") |
return; |
return; |
} |
} |
else { |
else { |
for (var j=0; j<numsplit.length; j++) { |
for (var j=0; j<newsecs.length; j++) { |
if ((numsplit[j] == 'all') || |
if ((newsecs[j] == 'all') || |
(numsplit[j] == 'none')) { |
(newsecs[j] == 'none')) { |
alert("'"+numsplit[j]+"' may not be used as the name for a section, as it is a reserved word.\\nPlease choose a different section name."); |
alert("'"+newsecs[j]+"' may not be used as the name for a section, as it is a reserved word.\\nPlease choose a different section name."); |
return; |
return; |
} |
} |
for (var k=0; k<groups.length; k++) { |
for (var k=0; k<groups.length; k++) { |
if (numsplit[j] == groups[k]) { |
if (newsecs[j] == groups[k]) { |
alert("'"+numsplit[j]+"' may not be used as a section name, as it is the name of a course group.\\nSection names and group names must be distinct. Please choose a different section name."); |
alert("'"+newsecs[j]+"' may not be used as a section name, as it is the name of a course group.\\nSection names and group names must be distinct. Please choose a different section name."); |
return; |
return; |
} |
} |
} |
} |
Line 324 sub print_user_modification_page {
|
Line 325 sub print_user_modification_page {
|
var userrole = document.cu.role.options[document.cu.role.selectedIndex].value |
var userrole = document.cu.role.options[document.cu.role.selectedIndex].value |
var section=""; |
var section=""; |
var numsections = 0; |
var numsections = 0; |
|
var newsecs = new Array(); |
for (var i=0; i<document.cu.currsec.length; i++) { |
for (var i=0; i<document.cu.currsec.length; i++) { |
if (document.cu.currsec.options[i].selected == true ) { |
if (document.cu.currsec.options[i].selected == true ) { |
if (document.cu.currsec.options[i].value != "" && document.cu.currsec.options[i].value != null) { |
if (document.cu.currsec.options[i].value != "" && document.cu.currsec.options[i].value != null) { |
Line 345 sub print_user_modification_page {
|
Line 347 sub print_user_modification_page {
|
else { |
else { |
section = section + "," + document.cu.newsec.value |
section = section + "," + document.cu.newsec.value |
} |
} |
var numsplit = document.cu.newsec.value.split(/,/g); |
newsecs = document.cu.newsec.value.split(/,/g); |
numsections = numsections + numsplit.length; |
numsections = numsections + newsecs.length; |
} |
} |
if ((userrole == 'st') && (numsections > 1)) { |
if ((userrole == 'st') && (numsections > 1)) { |
alert("In each course, each user may only have one student role at a time. You had selected "+numsections+" sections.\\nPlease modify your selections so they include no more than one section.") |
alert("In each course, each user may only have one student role at a time. You had selected "+numsections+" sections.\\nPlease modify your selections so they include no more than one section.") |
return; |
return; |
} |
} |
for (var j=0; j<numsplit.length; j++) { |
for (var j=0; j<newsecs.length; j++) { |
if ((numsplit[j] == 'all') || (numsplit[j] == 'none')) { |
if ((newsecs[j] == 'all') || (newsecs[j] == 'none')) { |
alert("'"+numsplit[j]+"' may not be used as the name for a section, as it is a reserved word.\\nPlease choose a different section name."); |
alert("'"+newsecs[j]+"' may not be used as the name for a section, as it is a reserved word.\\nPlease choose a different section name."); |
return; |
return; |
} |
} |
if (document.cu.groups.value != '') { |
if (document.cu.groups.value != '') { |
var groups = document.cu.groups.value.split(/,/g); |
var groups = document.cu.groups.value.split(/,/g); |
for (var k=0; k<groups.length; k++) { |
for (var k=0; k<groups.length; k++) { |
if (numsplit[j] == groups[k]) { |
if (newsecs[j] == groups[k]) { |
alert("'"+numsplit[j]+"' may not be used as the name for a section, as it is the name of a course group.\\nSection names and group names must be distinct. Please choose a different section name."); |
alert("'"+newsecs[j]+"' may not be used as the name for a section, as it is the name of a course group.\\nSection names and group names must be distinct. Please choose a different section name."); |
return; |
return; |
} |
} |
} |
} |
Line 1238 END
|
Line 1240 END
|
'</b><br />'); |
'</b><br />'); |
} |
} |
} elsif ($_=~/^form\.del/) { |
} elsif ($_=~/^form\.del/) { |
if ($_=~/^form\.del\:([^\_]+)\_([^\_]+)$/) { |
if ($_=~/^form\.del\:([^\_]+)\_([^\_\.]+)$/) { |
|
# Delete standard role |
$r->print(&mt('Deleting').' '.$2.' in '.$1.': '. |
$r->print(&mt('Deleting').' '.$2.' in '.$1.': '. |
&Apache::lonnet::assignrole($env{'form.ccdomain'}, |
&Apache::lonnet::assignrole($env{'form.ccdomain'}, |
$env{'form.ccuname'},$1,$2,$now,0,1).'<br />'); |
$env{'form.ccuname'},$1,$2,$now,0,1).'<br />'); |
Line 1254 END
|
Line 1257 END
|
&Apache::lonnet::escape($now.':'), |
&Apache::lonnet::escape($now.':'), |
$env{'course.'.$cid.'.home'}).'</b><br />'); |
$env{'course.'.$cid.'.home'}).'</b><br />'); |
} |
} |
} |
} |
|
if ($_=~/^form\.del\:([^\_]+)\_cr\.cr\/(\w+)\/(\w+)\/(\w+)$/) { |
|
my ($url,$rdom,$rnam,$rolename) = ($1,$2,$3,$4); |
|
# Delete custom role |
|
$r->print(&mt('Deleting custom role [_1] by [_2]@[_3] in [_4]', |
|
$rolename,$rnam,$rdom,$url).': <b>'. |
|
&Apache::lonnet::assigncustomrole($env{'form.ccdomain'}, |
|
$env{'form.ccuname'},$url,$rdom,$rnam,$rolename,$now, |
|
0,1).'</b><br />'); |
|
} |
} elsif ($_=~/^form\.ren/) { |
} elsif ($_=~/^form\.ren/) { |
my $udom = $env{'form.ccdomain'}; |
my $udom = $env{'form.ccdomain'}; |
my $uname = $env{'form.ccuname'}; |
my $uname = $env{'form.ccuname'}; |
if ($_=~/^form\.ren\:([^\_]+)\_([^\_]+)$/) { |
# Re-enable standard role |
|
if ($_=~/^form\.ren\:([^\_]+)\_([^\_\.]+)$/) { |
my $url = $1; |
my $url = $1; |
my $role = $2; |
my $role = $2; |
my $logmsg; |
my $logmsg; |
Line 1278 END
|
Line 1291 END
|
} else { |
} else { |
my $result=&Apache::lonnet::assignrole($env{'form.ccdomain'}, |
my $result=&Apache::lonnet::assignrole($env{'form.ccdomain'}, |
$env{'form.ccuname'},$url,$role,0,$now); |
$env{'form.ccuname'},$url,$role,0,$now); |
$output = &mt('Re-Enabling [_1] in [_2]: [_3]', |
$output = &mt('Re-enabling [_1] in [_2]: <b>[_3]</b>', |
$role,$url,$result).'<br />'; |
$role,$url,$result).'<br />'; |
} |
} |
$r->print($output); |
$r->print($output); |
} |
} |
|
# Re-enable custom role |
|
if ($_=~/^form\.ren\:([^\_]+)\_cr\.cr\/(\w+)\/(\w+)\/(\w+)$/) { |
|
my ($url,$rdom,$rnam,$rolename) = ($1,$2,$3,$4); |
|
my $result = &Apache::lonnet::assigncustomrole( |
|
$env{'form.ccdomain'}, $env{'form.ccuname'}, |
|
$url,$rdom,$rnam,$rolename,0,$now); |
|
$r->print(&mt('Re-enabling custom role [_1] by [_2]@[_3] in [_4] : <b>[_5]</b>', |
|
$rolename,$rnam,$rdom,$url,$result).'<br />'); |
|
} |
} elsif ($_=~/^form\.act/) { |
} elsif ($_=~/^form\.act/) { |
my $udom = $env{'form.ccdomain'}; |
my $udom = $env{'form.ccdomain'}; |
my $uname = $env{'form.ccuname'}; |
my $uname = $env{'form.ccuname'}; |