[LON-CAPA-cvs] cvs: loncom /interface lonparmset.pm

[matthew]

matthew		Tue Mar 26 11:08:46 2002 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  Sort maps alphabetically instead of using their order in the hash.
  Bug #224
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.47 loncom/interface/lonparmset.pm:1.48
--- loncom/interface/lonparmset.pm:1.47	Mon Mar 25 14:33:35 2002
+++ loncom/interface/lonparmset.pm	Tue Mar 26 11:08:46 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.47 2002/03/25 19:33:35 matthew Exp $
+# $Id: lonparmset.pm,v 1.48 2002/03/26 16:08:46 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -557,7 +557,7 @@
     if (!$pssymb) {
 	$r->print('</select></tr><tr><td>Select Enclosing Map</td><td><select name=pschp>');
 	$r->print('<option value=all>All Maps</option>');
-	foreach (keys %allmaps) {
+	foreach (sort keys %allmaps) {
 	    $r->print('<option value="'.$_.'"');
 	    if (($pssymb=~/^$allmaps{$_}/) || 
 		($pschp eq $_)) { $r->print(' selected'); }