Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	13 Feb 2002 17:41:11 -0000	1.5
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	18 Feb 2002 22:00:17 -0000	1.6
@@ -151,7 +151,7 @@
             where user_id = :user_id
         } -default ""]
 
-        if {![empty_string_p $rel_id]} {
+        if {[empty_string_p $rel_id]} {
             return
         }