Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -N -r1.66 -r1.67
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	21 Feb 2018 14:00:56 -0000	1.66
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	3 Mar 2018 16:54:05 -0000	1.67
@@ -507,7 +507,7 @@
     }
 
     return [permission::permission_p -party_id $user_id \
-		-object_id [acs_lookup_magic_object security_context_root] \
+		-object_id [acs_magic_object security_context_root] \
 		-privilege "admin"]
 }
 
Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -N -r1.130 -r1.131
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	22 Feb 2018 11:14:14 -0000	1.130
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	3 Mar 2018 16:54:05 -0000	1.131
@@ -817,7 +817,7 @@
                     permission::require_permission -object_id [ad_conn object_id] -privilege admin
                 }
                 sitewide-admin/* {
-                    permission::require_permission -object_id [acs_lookup_magic_object security_context_root] -privilege admin
+                    permission::require_permission -object_id [acs_magic_object security_context_root] -privilege admin
                 }
                 default {
                     # ns_log notice "rp_filter calls: permission::require_permission -object_id [ad_conn object_id] -privilege read"