Index: openacs-4/packages/project-manager/tcl/project-manager-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/project-manager-procs.tcl,v diff -u -r1.14 -r1.15 --- openacs-4/packages/project-manager/tcl/project-manager-procs.tcl 22 May 2006 06:14:27 -0000 1.14 +++ openacs-4/packages/project-manager/tcl/project-manager-procs.tcl 5 Jun 2006 11:57:30 -0000 1.15 @@ -540,21 +540,6 @@ @error } { - # HTML portions of this copied from notification::email::send - - if {[string equal $mime_type "text/plain"]} { - set body_text $body - set body_html [ad_html_text_convert -from $mime_type -to "text/html" -- $body] - } elseif {[string equal $mime_type "text/html"]} { - set body_text [ad_html_text_convert -from $mime_type -to "text/plain" -- $body] - set body_html $body - - } else { - set body_text [ad_html_text_convert -from $mime_type -to "text/plain" -- $body] - set body_html [ad_html_text_convert -from $mime_type -to "text/html" -- $body] - - } - # Use this to build up extra mail headers set extra_headers [ns_set new]