[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface courseprefs.pm
raeburn
raeburn@source.lon-capa.org
Mon, 18 Jan 2010 20:18:11 -0000
raeburn Mon Jan 18 20:18:11 2010 EDT
Modified files: (Branch: version_2_9_X)
/loncom/interface courseprefs.pm
Log:
- Backport 1.21 and part of 1.20.
Index: loncom/interface/courseprefs.pm
diff -u loncom/interface/courseprefs.pm:1.8.2.4 loncom/interface/courseprefs.pm:1.8.2.5
--- loncom/interface/courseprefs.pm:1.8.2.4 Sun Jan 3 01:59:25 2010
+++ loncom/interface/courseprefs.pm Mon Jan 18 20:18:11 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set configuration settings for a course
#
-# $Id: courseprefs.pm,v 1.8.2.4 2010/01/03 01:59:25 raeburn Exp $
+# $Id: courseprefs.pm,v 1.8.2.5 2010/01/18 20:18:11 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1756,11 +1756,11 @@
my %sections = &Apache::loncommon::get_sections($cdom,$cnum);
my @sections = sort( { $a <=> $b } keys(%sections));
my %lt = &Apache::lonlocal::texthash (
- currone => 'Current recipient:',
- curmult => 'Current recipients:',
- add => 'Additional recipient:',
- del => 'Delete?',
- sec => 'Sections:',
+ currone => 'Current recipient:',
+ currmult => 'Current recipients:',
+ add => 'Additional recipient:',
+ del => 'Delete?',
+ sec => 'Sections:',
);
foreach my $item (@{$ordered}) {
@@ -1821,7 +1821,7 @@
if ($num) {
$output .= '<tr>'.
'<td align="left"><i>';
- if ($num > 1) {
+ if ($num == 1) {
$output .= $lt->{'currone'};
} else {
$output .= $lt->{'currmult'};
@@ -1941,11 +1941,11 @@
my %sections = &Apache::loncommon::get_sections($cdom,$cnum);
my @sections = sort( { $a <=> $b } keys(%sections));
my %lt = &Apache::lonlocal::texthash (
- currone => 'Disallowed:',
- curmult => 'Disallowed:',
- add => 'Disallow more:',
- del => 'Delete?',
- sec => 'Sections:',
+ currone => 'Disallowed:',
+ currmult => 'Disallowed:',
+ add => 'Disallow more:',
+ del => 'Delete?',
+ sec => 'Sections:',
);
foreach my $item (@{$ordered}) {