Index: openacs-4/packages/general-comments/tcl/general-comments-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/tcl/general-comments-procs.tcl,v diff -u -r1.12.2.1 -r1.12.2.2 --- openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 22 Mar 2004 02:54:57 -0000 1.12.2.1 +++ openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 21 Jun 2004 18:46:47 -0000 1.12.2.2 @@ -162,11 +162,11 @@ set html "" if { $print_content_p == 1 } { append html "

$title

\n" - if { $mime_type == "text/plain" } { - append html "[util_convert_plaintext_to_html $content]\n" - } else { - append html "$content\n" - } + + # convert to html + set richtext_list [list $content $mime_type] + append html [template::util::richtext::get_property html_value $richtext_list] + if { $print_attachments_p == 1 } { set attachments_html "" db_foreach get_attachments "