Index: openacs-4/packages/dotlrn/www/admin/users-search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-search.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/dotlrn/www/admin/users-search.tcl	8 Aug 2006 21:26:28 -0000	1.27
+++ openacs-4/packages/dotlrn/www/admin/users-search.tcl	28 Apr 2009 10:16:37 -0000	1.28
@@ -101,7 +101,7 @@
     -label "[_ dotlrn.Type]" \
     -datatype text \
     -widget select \
-    -options "[list [_ dotlrn.Any] any] [dotlrn::get_user_types_as_options]" \
+    -options "[concat [list [list [_ dotlrn.Any] any]] [dotlrn::get_user_types_as_options]]" \
     -value $type
 
 element create user_search can_browse_p \
@@ -251,7 +251,7 @@
     if {[llength $wheres]} {
         append sql " where "
         append sql [join $wheres " $join_criteria "]
-	append sql "order by last_name, first_names"
+        append sql " order by last_name, first_names"
     }
 
     set referer [ns_conn url]