Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 3 May 2002 16:29:59 -0000 1.1 +++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 31 Jul 2002 22:57:41 -0000 1.2 @@ -620,7 +620,10 @@ foreach email [array names recipient] { if { $recipient($email) && ![empty_string_p $email] } { - ns_sendmail $email $sender_email $subject $body + if {[catch {ns_sendmail $email $sender_email $subject $body} errmsg]} { + # In case we can't send the email + ns_log Notice "\[bug-tracker\] Error sending email: $errmsg" + } } } }