Index: openacs-4/packages/assessment/tcl/as-apm-action-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-apm-action-procs-postgresql.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/assessment/tcl/as-apm-action-procs-postgresql.xql	27 Feb 2005 17:07:17 -0000	1.4
+++ openacs-4/packages/assessment/tcl/as-apm-action-procs-postgresql.xql	13 Mar 2005 22:08:45 -0000	1.5
@@ -3,6 +3,16 @@
 
     <rdbms><type>postgresql</type><version>7.2</version></rdbms>
 
+
+    <fullquery name="as::actions::get_admin_user_id.select_user_id">
+        <querytext>
+            select user_id
+            from users
+            where acs_permission__permission_p(:context_root_id, user_id, 'admin') = 't'
+            limit 1  
+        </querytext>
+    </fullquery>
+
     <fullquery name="as::actions::insert_actions.insert_default">
         <querytext>
 		  select as_action__default_actions ($package_id,$user_id,$package_id)