Index: openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl,v
diff -u -r1.36 -r1.37
--- openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl	17 Mar 2006 15:02:03 -0000	1.36
+++ openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl	22 Mar 2006 15:36:59 -0000	1.37
@@ -2566,6 +2566,7 @@
     set identifier [string tolower [imsld::parse::get_attribute -node $activity_node -attr_name identifier]]
     set number_to_select [imsld::parse::get_attribute -node $activity_node -attr_name number-to-select]
     set sort [imsld::parse::get_attribute -node $activity_node -attr_name sort]
+    set sort [expr { [string eq "" $sort] ? "as-is" : "[string tolower $sort]" }]
     set structure_type [imsld::parse::get_attribute -node $activity_node -attr_name structure-type]
     set title [imsld::parse::get_title -node $activity_node -prefix imsld]