|
- + |
ENDONE
foreach my $task (@{$tasksref}) {
if ($task eq $action) {
@@ -272,9 +272,7 @@ ENDONE
$r->print("
|
- - | - | "); + | ");
}
###############################################################
@@ -429,7 +427,7 @@ Note: Any students added manually by cou
}
my $dateshow;
if ( ($oldendshow eq '') && ($oldstartshow eq '') ) {
- $dateshow = " Warning. Currently NO first enrollment or last enrollment dates are set. You must use this menu to set a start date and an end date if you plan to utilise automated adds and/or drops in this course.\n"; + $dateshow = " Warning. Currently NO first enrollment or last enrollment dates are set. You must use this menu to set a start date and an end date if you plan to utilise automated adds and/or drops in this course.\n"; } else { $dateshow = "Currently: First enrollment: $oldstartshow, Last enrollment: $oldendshow\n"; } @@ -1155,7 +1153,8 @@ onclick="javascript:document.photoupdate my ($indexhash,$keylist) = &Apache::lonuserutils::make_keylist_array(); my $classlist = &Apache::loncoursedata::get_classlist(); my $secidx = &Apache::loncoursedata::CL_SECTION(); - my ($permission,$allowed) = &Apache::lonuserutils::get_permission(); + my $crstype =&Apache::loncommon::course_type(); + my ($permission,$allowed) = &Apache::lonuserutils::get_permission('course',$crstype); foreach my $student (keys(%{$classlist})) { if (exists($permission->{'view_section'})) { if ($classlist->{$student}[$secidx] ne $permission->{'view_section'}) { @@ -1333,7 +1332,7 @@ sub print_accessdate_table { ); my $dateshow; if ( ($oldendshow eq '') && ($oldstartshow eq '') ) { - $dateshow = " ".&mt('Warning').". ".$lt{'cuno'}." "; + $dateshow = " ".&mt('Warning').". ".$lt{'cuno'}." "; if ($action eq 'setaccess') { $dateshow .= $lt{'ifyo'}."\n"; } elsif ($action eq 'updatenow') { @@ -1513,7 +1512,7 @@ sub print_chgsettings_response { } if ($autoadds || $autodrops) { $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you indicated that nightly "; + $warn_prefix = " Warning. Although you indicated that nightly "; $warn_suffix = " should be enabled, additional action is required. "; } if ($autoadds) { @@ -1611,7 +1610,7 @@ sub print_setdates_response { } } $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you set a start and end date for auto-enrollment, additional action is required. "; + $warn_prefix = " Warning. Although you set a start and end date for auto-enrollment, additional action is required. "; unless ($warning eq '') { $response .= $warn_prefix.$warning; } @@ -1710,7 +1709,7 @@ start and end access dates for this cour } } $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you have set default first and last access dates for students who are added via automatic enrollment, additional action is required. "; + $warn_prefix = " Warning. Although you have set default first and last access dates for students who are added via automatic enrollment, additional action is required. "; unless ($warning eq '') { $response .= $warn_prefix.$warning; } @@ -2018,7 +2017,7 @@ sub print_crosslistings_response () { if (@allxlists > 0) { $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you have selected crosslisted courses to contribute enrollment to this course, additional action is required. "; + $warn_prefix = " Warning. Although you have selected crosslisted courses to contribute enrollment to this course, additional action is required. "; unless ($warning eq '') { $response .= $warn_prefix.$warning; } @@ -2156,7 +2155,7 @@ sections which contribute to enrollment if ($seccount > 0) { $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you have selected sections to contribute enrollment to this course, additional action is required. "; + $warn_prefix = " Warning. Although you have selected sections to contribute enrollment to this course, additional action is required. "; unless ($warning eq '') { $response .= $warn_prefix.$warning; } @@ -2327,7 +2326,7 @@ sub print_sections_response () { if (@allsections > 0) { $warning = &warning_message($dom,$crs,$action); - $warn_prefix = " Warning. Although you have selected sections to contribute enrollment to this course, additional action is required. "; + $warn_prefix = " Warning. Although you have selected sections to contribute enrollment to this course, additional action is required. "; unless ($warning eq '') { $response .= $warn_prefix.$warning; } |