Index: openacs-4/packages/dotlrn/www/spam-recipients.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam-recipients.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/dotlrn/www/spam-recipients.tcl 7 Aug 2017 23:48:09 -0000 1.8 +++ openacs-4/packages/dotlrn/www/spam-recipients.tcl 17 Jul 2018 11:42:26 -0000 1.9 @@ -7,7 +7,7 @@ set spam_name [bulk_mail::parameter -parameter PrettyName -default [_ dotlrn.Spam]] set context_bar [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"] -if { (![info exists community_id] || $community_id eq "") } { +if { ![info exists community_id] || $community_id eq "" } { set community_id [dotlrn_community::get_community_id] } set community_name [dotlrn_community::get_community_name $community_id]