--- loncom/interface/lonparmset.pm 2005/06/28 15:12:54 1.232 +++ loncom/interface/lonparmset.pm 2005/06/28 15:26:06 1.234 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.232 2005/06/28 15:12:54 albertel Exp $ +# $Id: lonparmset.pm,v 1.234 2005/06/28 15:26:06 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -918,16 +918,16 @@ ENDSCRIPT } $r->print(' -Select All
-Select Common Only +Select All
+Select Common Only -Add Problem Dates -Add Content Dates
-Add Discussion Settings -Add Visibilities
-Add Part Parameters +Add Problem Dates +Add Content Dates
+Add Discussion Settings +Add Visibilities
+Add Part Parameters -Unselect All +Unselect All '); $r->print(''); @@ -941,7 +941,9 @@ sub partmenu { $r->print('>'.&mt('All Parts').''); my %temphash=(); foreach (@{$psprt}) { $temphash{$_}=1; } - foreach my $tempkey (sort keys %{$allparts}) { + foreach my $tempkey (sort { + if ($a==$b) { return ($a cmp $b) } else { return ($a <=> $b); } + } keys(%{$allparts})) { unless ($tempkey =~ /\./) { $r->print('