Index: openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl	13 Jan 2005 13:57:21 -0000	1.3
+++ openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl	1 Mar 2005 00:01:28 -0000	1.4
@@ -31,7 +31,7 @@
 set dotlrn_admins_group [db_string group_id_from_name "
             select group_id from groups where group_name='dotlrn-admin'" -default ""]
 
-set admin_id [ad_verify_and_get_user_id]
+set admin_id [ad_conn user_id]
 
 set elements [list user \
 		  [list label "User" \