Index: openacs-4/packages/dotlrn/www/admin/user.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.tcl,v
diff -u -r1.16.6.4 -r1.16.6.5
--- openacs-4/packages/dotlrn/www/admin/user.tcl	25 Aug 2004 15:50:58 -0000	1.16.6.4
+++ openacs-4/packages/dotlrn/www/admin/user.tcl	13 Oct 2004 19:27:46 -0000	1.16.6.5
@@ -93,6 +93,8 @@
         -privilege admin \
         ]
 
+set dotlrn_admin_p [dotlrn::admin_p]
+
 set context_bar [list [list users [_ dotlrn.Users]] "$first_names $last_name"]
 
 set dual_approve_return_url [ns_urlencode [dotlrn::get_admin_url]/user-new-2?user_id=$user_id&referer=$return_url]