Index: openacs-4/packages/assessment/tcl/as-section-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-section-procs.tcl,v
diff -u -N -r1.23.2.1 -r1.23.2.2
--- openacs-4/packages/assessment/tcl/as-section-procs.tcl	10 Jun 2005 18:53:30 -0000	1.23.2.1
+++ openacs-4/packages/assessment/tcl/as-section-procs.tcl	26 Jul 2005 17:14:33 -0000	1.23.2.2
@@ -202,7 +202,7 @@
     {-session_id:required}
     {-sort_order_type ""}
     {-num_items ""}
-    {-random_p ""}
+    {-random_p "t"}
 } {
     @author Timo Hentschel (timo@timohentschel.de)
     @creation-date 2004-12-14
@@ -239,6 +239,7 @@
     }
 
     # sort item positions that are not fixed
+    ns_log notice "--------------> $sort_order_type"
     switch -exact $sort_order_type {
 	alphabetical {
 	    set open_positions [lsort -dictionary -index 1 $open_positions]