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 -r1.25.2.11 -r1.25.2.12
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	21 Jun 2003 16:44:05 -0000	1.25.2.11
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	4 Jul 2003 13:52:24 -0000	1.25.2.12
@@ -596,7 +596,9 @@
       ad_try {
 	if {[string match "admin/*" [ad_conn extra_url]]} {
             permission::require_permission -object_id [ad_conn object_id] -privilege admin
-	} else {
+	} elseif {[string match "sw-admin/*" [ad_conn extra_url]]} {
+            permission::require_permission -object_id [acs_lookup_magic_object security_context_root] -privilege admin
+        } else {
             permission::require_permission -object_id [ad_conn object_id] -privilege read
 	}
       } ad_script_abort val {