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.83 -r1.84
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	2 Jun 2005 19:48:24 -0000	1.83
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	7 Sep 2005 16:46:57 -0000	1.84
@@ -666,7 +666,7 @@
 
     if { ![empty_string_p [ad_conn object_id]] } {
       ad_try {
-        switch -glob [ad_conn extra_url] {
+        switch -glob -- [ad_conn extra_url] {
             admin/* {
               permission::require_permission -object_id [ad_conn object_id] -privilege admin
             }