Index: openacs-4/packages/assessment/tcl/as-apm-action-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-apm-action-procs.tcl,v
diff -u -r1.10.2.1 -r1.10.2.2
--- openacs-4/packages/assessment/tcl/as-apm-action-procs.tcl	1 Sep 2020 15:11:19 -0000	1.10.2.1
+++ openacs-4/packages/assessment/tcl/as-apm-action-procs.tcl	17 Oct 2020 16:41:27 -0000	1.10.2.2
@@ -9,7 +9,7 @@
 ad_proc -private as::actions::get_admin_user_id {} {
     Return the user id of a site-wide-admin on the system
 } {
-    set context_root_id [acs_lookup_magic_object security_context_root]
+    set context_root_id [acs_magic_object security_context_root]
 
     return [db_string select_user_id {
         select min(user_id)