Index: openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/01-database-procs.tcl,v
diff -u -N -r1.1.2.22 -r1.1.2.23
--- openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl	17 Feb 2021 08:20:57 -0000	1.1.2.22
+++ openacs-4/packages/acs-tcl/tcl/01-database-procs.tcl	22 Feb 2021 15:57:58 -0000	1.1.2.23
@@ -1171,7 +1171,7 @@
     return 0
 }
 
-ad_proc -private db_bind_var_substitution { sql { bind "" } } {
+ad_proc -public db_bind_var_substitution { sql { bind "" } } {
 
     This proc emulates the bind variable substitution in the PostgreSQL driver.
     Since this is a temporary hack, we do it in Tcl instead of hacking up the