Index: openacs-4/contrib/packages/cop-base/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/cop-base/www/admin/index.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/cop-base/www/admin/index.tcl	25 Jan 2005 23:33:44 -0000	1.1
+++ openacs-4/contrib/packages/cop-base/www/admin/index.tcl	1 Mar 2005 00:01:16 -0000	1.2
@@ -8,7 +8,7 @@
 }
 
 set package_id [ad_conn package_id]
-set user_id [ad_verify_and_get_user_id]
+set user_id [ad_conn user_id]
 set admin_p [permission::permission_p -party_id $user_id -object_id $package_id -privilege admin]
 db_1row pending {select count(*) as pending from cop_requests where req_state = 'pending'}