[LON-CAPA-cvs] cvs: loncom /interface lonhtmlcommon.pm
minaeibi
lon-capa-cvs@mail.lon-capa.org
Tue, 14 Jan 2003 22:01:56 -0000
minaeibi Tue Jan 14 17:01:56 2003 EDT
Modified files:
/loncom/interface lonhtmlcommon.pm
Log:
Fixed bug #1168 a minor change done in lonhtmalcommon.pm to
sort the section list. so before we had this:
3
4
6
456
1
2
5
ta
adm
Now we have:
1
2
3
4
456
6
adm
ta
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.10 loncom/interface/lonhtmlcommon.pm:1.11
--- loncom/interface/lonhtmlcommon.pm:1.10 Tue Sep 17 11:32:46 2002
+++ loncom/interface/lonhtmlcommon.pm Tue Jan 14 17:01:56 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.10 2002/09/17 15:32:46 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.11 2003/01/14 22:01:56 minaeibi Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -444,7 +444,7 @@
my $Str = '';
$Str .= '<select name="Section" multiple="true" size="4">'."\n";
- foreach (@$sections) {
+ foreach (sort @$sections) {
$Str .= '<option';
foreach my $selected (@$selectedSections) {
if($_ eq $selected) {