Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.191.2.14 -r1.191.2.15
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Sep 2005 03:09:18 -0000	1.191.2.14
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	21 Sep 2005 02:48:00 -0000	1.191.2.15
@@ -2261,7 +2261,7 @@
 	if {[exists_and_not_null override_subject]} {
 	    set subject $override_subject
 	}
-        if {[exists_and_not_null email]} {
+        if {[info exists email] && ![string equal "" [string trim $email]]} {
 
 	    # user %varname% to substitute variables in email
 	    set subject_vars [lang::message::get_embedded_vars $subject]