--- loncom/interface/lonparmset.pm 2005/06/20 14:13:00 1.231
+++ 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.231 2005/06/20 14:13:00 www 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('