Index: openacs-4/packages/contacts/www/contact.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact.tcl,v
diff -u -r1.31 -r1.32
--- openacs-4/packages/contacts/www/contact.tcl	10 Nov 2005 22:58:34 -0000	1.31
+++ openacs-4/packages/contacts/www/contact.tcl	29 Jan 2006 16:10:52 -0000	1.32
@@ -119,6 +119,10 @@
     }
 }
 
-set freelancer_p [group::member_p -user_id $party_id -group_name "Freelancer"]
-
+set freelancer_group_id [group::get_id -group_name "Freelancer"]
+if {$freelancer_group_id ne ""} {
+    set freelancer_p [group::member_p -user_id $party_id -group_name "Freelancer"]
+} else {
+    set freelancer_p "0"
+}
 ad_return_template