--- loncom/homework/edit.pm 2002/03/22 20:05:19 1.32
+++ loncom/homework/edit.pm 2002/03/28 22:03:21 1.33
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# edit mode helpers
#
-# $Id: edit.pm,v 1.32 2002/03/22 20:05:19 albertel Exp $
+# $Id: edit.pm,v 1.33 2002/03/28 22:03:21 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -165,9 +165,12 @@ sub get_insert_list {
}
}
if (@tagnums) {
+ my %options;
foreach my $tagnum (@tagnums) {
- $result.='\n";
+ my $descrip=$Apache::lonxml::insertlist{"$tagnum.description"};
+ $options{$descrip} ="\n";
}
+ foreach my $option (sort(keys(%options))) { $result.=$options{$option}; }
if ($result) { $result=''.$result; }
}
return $result;