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 -r1.8 -r1.9
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	16 Mar 2002 01:32:21 -0000	1.8
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	24 May 2002 00:58:56 -0000	1.9
@@ -34,7 +34,7 @@
 } {
     return [db_string email_from_party {
         select email from parties where party_id = :party_id
-    } -default 0]
+    } -default ""]
 }
 
 ad_proc cc_email_user { email } {