[LON-CAPA-cvs] cvs: loncom /interface lonparmset.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Tue, 07 Aug 2007 02:02:04 -0000
albertel Mon Aug 6 22:02:04 2007 EDT
Modified files:
/loncom/interface lonparmset.pm
Log:
- BUG#5345 -> when selecting all parts need to convert the string all in the list of all parts
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.373 loncom/interface/lonparmset.pm:1.374
--- loncom/interface/lonparmset.pm:1.373 Wed Aug 1 20:42:43 2007
+++ loncom/interface/lonparmset.pm Mon Aug 6 22:02:01 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.373 2007/08/02 00:42:43 albertel Exp $
+# $Id: lonparmset.pm,v 1.374 2007/08/07 02:02:01 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2727,8 +2727,8 @@
my @selected_sections =
&Apache::loncommon::get_env_multiple('form.Section');
@selected_sections = ('all') if (! @selected_sections);
- foreach (@selected_sections) {
- if ($_ eq 'all') {
+ foreach my $sec (@selected_sections) {
+ if ($sec eq 'all') {
@selected_sections = ('all');
}
}
@@ -2748,6 +2748,9 @@
\%mapp, \%symbp,\%maptitles,\%uris,
\%keyorder,\%defkeytype);
+ if (grep {$_ eq 'all'} (@psprt)) {
+ @psprt = keys(%allparts);
+ }
# Menu to select levels, etc
$r->print('<table id="LC_parm_overview_scope">