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.19 -r1.20 --- openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 8 Aug 2006 21:26:56 -0000 1.19 +++ openacs-4/packages/general-comments/tcl/general-comments-procs.tcl 5 May 2007 15:54:47 -0000 1.20 @@ -59,6 +59,19 @@ } } + # Convert the comment to HTML + + if {$comment_mime_type ne "text/html"} { + set content [ad_convert_to_html $content] + } + + # Start notifications + callback general_comments::notify_objects \ + -object_id $object_id \ + -comment $content \ + -title $title \ + -object_type [acs_object_type $object_id] + return $revision_id }