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.43 -r1.44
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	15 Sep 2003 16:06:15 -0000	1.43
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	18 Sep 2003 13:44:30 -0000	1.44
@@ -515,7 +515,7 @@
             if { [regexp {^GET [^\?]*\?(.*) HTTP} [ns_conn request] match vars] } {
                 append url ?$vars
             }
-            if { [ad_secure_conn_p] } {
+            if { [security::secure_conn_p] } {
                 # it's a secure connection.
                 ad_returnredirect https://[ad_host][ad_port]$url
                 return "filter_return"