Index: openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl,v
diff -u -r1.1.2.9 -r1.1.2.10
--- openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl	27 Nov 2023 18:32:57 -0000	1.1.2.9
+++ openacs-4/packages/acs-tcl/tcl/cluster-procs.tcl	28 Nov 2023 15:55:08 -0000	1.1.2.10
@@ -521,7 +521,7 @@
             #
             dict set d host [ns_addrbyhost [dict get $d host]]
             dict with d {
-                set result [util::join_location -proto $proto -hostname $host -port $port]
+                set result [util::join_location -noabbrev -proto $proto -hostname $host -port $port]
             }
             return $result
         }