Index: openacs-4/packages/acs-tcl/tcl/cluster-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/cluster-init.tcl,v
diff -u -r1.1.2.4 -r1.1.2.5
--- openacs-4/packages/acs-tcl/tcl/cluster-init.tcl	29 Mar 2022 08:53:45 -0000	1.1.2.4
+++ openacs-4/packages/acs-tcl/tcl/cluster-init.tcl	29 May 2022 19:15:13 -0000	1.1.2.5
@@ -30,7 +30,7 @@
     foreach ip [parameter::get -package_id $::acs::kernel_id -parameter ClusterAuthorizedIP] {
         if {[string first * $ip] > -1} {
             ::acs::Cluster eval [subst {
-                lappend allowed_host_patterns $ip
+                lappend :allowed_host_patterns $ip
             }]
         } else {
             ::acs::Cluster eval [subst {