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.153.2.11 -r1.153.2.12
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	11 Oct 2019 15:44:08 -0000	1.153.2.11
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	16 Nov 2019 15:34:52 -0000	1.153.2.12
@@ -1911,7 +1911,7 @@
 
 
 
-ad_proc -public request_denied_filter { why } {
+ad_proc -private rp_request_denied_filter { why } {
     Deny serving the request
 } {
     ad_return_forbidden \
@@ -1925,7 +1925,7 @@
 
 if {[ns_info name] eq "NaviServer"} {
     # this is written for NaviServer 4.99.1 or newer
-    foreach filter {rp_filter rp_resources_filter request_denied_filter} {
+    foreach filter {rp_filter rp_resources_filter rp_request_denied_filter} {
         set cmd ${filter}_aolserver
         if {[info commands $cmd] ne ""} {rename $cmd ""}
         rename $filter $cmd