Index: openacs-4/packages/assessment/tcl/as-item-display-rb-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-display-rb-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/assessment/tcl/as-item-display-rb-procs.tcl	18 Jan 2005 12:42:37 -0000	1.8
+++ openacs-4/packages/assessment/tcl/as-item-display-rb-procs.tcl	25 Jan 2005 12:47:22 -0000	1.9
@@ -115,15 +115,15 @@
 
     # numerical alphabetical randomized order_of_entry
     switch -exact $sort_order_type {
-	numerical {
-	    set data [lsort -command as::assessment::compare_numbers $data]
-	}
 	alphabetical {
 	    set data [lsort -dictionary -index 0 $data]
 	}
 	randomized {
 	    set data [util::randomize_list $data]
 	}
+	default {
+	    set data [lsort -dictionary -index 0 $data]
+	}
     }
 
     set optional ""