Index: openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/cluster-procs.tcl,v
diff -u -r1.1.2.8 -r1.1.2.9
--- openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl	2 Mar 2023 12:33:39 -0000	1.1.2.8
+++ openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl	27 Nov 2023 18:32:57 -0000	1.1.2.9
@@ -638,7 +638,7 @@
                 #
                 ns_log notice "Cluster join_request $peerLocation accepted from $peerLocation"
                 set dynamicClusterNodes [parameter::get -package_id $::acs::kernel_id -parameter DynamicClusterPeers]
-                set dynamicClusterNodes [lsort -unique [concat $dynamicClusterNodes $peerLocation]]
+                set dynamicClusterNodes [lsort -unique [concat $dynamicClusterNodes [:qualified_location $peerLocation]]]
                 #
                 # The parameter::set_value operation causes a
                 # clusterwide cache-flush for the parameters