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.63.2.1 -r1.63.2.2
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	6 Jul 2004 08:04:42 -0000	1.63.2.1
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	7 Sep 2005 16:47:00 -0000	1.63.2.2
@@ -647,7 +647,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
             }