Index: openacs-4/packages/assessment/tcl/as-item-display-sb-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-display-sb-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/assessment/tcl/as-item-display-sb-procs.tcl	11 Jan 2005 16:29:23 -0000	1.5
+++ openacs-4/packages/assessment/tcl/as-item-display-sb-procs.tcl	18 Jan 2005 12:42:37 -0000	1.6
@@ -120,7 +120,7 @@
     # numerical alphabetical randomized order_of_entry
     switch -exact $sort_order_type {
 	numerical {
-	    set data [lsort -real -index 0 $data]
+	    set data [lsort -command as::assessment::compare_numbers $data]
 	}
 	alphabetical {
 	    set data [lsort -dictionary -index 0 $data]