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 -N -r1.14 -r1.15 --- openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 12 May 2004 22:55:45 -0000 1.14 +++ openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 29 Jun 2004 10:18:34 -0000 1.15 @@ -168,11 +168,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 "