Index: openacs-4/packages/acs-tcl/tcl/server-cluster-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/server-cluster-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-tcl/tcl/server-cluster-procs.tcl	10 Jul 2007 09:59:58 -0000	1.5
+++ openacs-4/packages/acs-tcl/tcl/server-cluster-procs.tcl	27 Sep 2007 08:03:46 -0000	1.6
@@ -27,7 +27,7 @@
             set myport 80
             set myhost $host
        }
-       if { $myhost != $my_ip } {
+       if { $myhost ne $my_ip } {
 	    lappend peer_hosts $host
 	}
     }