Index: openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl	30 Jan 2002 22:54:59 -0000	1.1
+++ openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl	30 Jan 2002 23:32:41 -0000	1.2
@@ -1,15 +1,16 @@
 ad_page_contract {
-    Displays main dotLRN admin page
-
-    @author Ben Adida (ben@openforce.net)
-    @creation-date 2001-11-04
+    @author yon (yon@openforce.net)
+    @creation-date 2002-01-30
+    @version $Id$
 } -query {
     {search_text ""}
 } -properties {
     user_id:onevalue
     users:multirow
 }
 
+set user_id [ad_conn user_id]
+
 if {![exists_and_not_null type]} {
     set type admin
 }