Index: openacs-4/contrib/packages/project-manager/www/task-print.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-print.tcl,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/contrib/packages/project-manager/www/task-print.tcl	12 Mar 2004 13:44:45 -0000	1.3
+++ openacs-4/contrib/packages/project-manager/www/task-print.tcl	20 May 2004 17:30:05 -0000	1.3.2.1
@@ -25,6 +25,7 @@
     orderby_revisions:optional
     orderby_dependency:optional
     orderby_dependency2:optional
+    {show_comment_p "f"}
 
 } -properties {
     task_info:onerow
@@ -79,6 +80,7 @@
 
 set comments_link [general_comments_create_link -object_name pm_task -link_text "Add a comment" -context_id $package_id $task_id "[ad_conn url]?task_id=$task_id"]
 
+set show_comment_link "<a href=\"[ad_conn url]?task_id=$task_id&show_comment_p=t\">show comments</a>"
 
 
 # permissions
@@ -90,7 +92,11 @@
 # Task info ----------------------------------------------------------
 
 db_1row task_query { } -column_array task_info
-set task_info(description) [ad_text_to_html -- $task_info(description)]
+
+set richtext_list [list $task_info(description) $task_info(mime_type)]
+
+set task_info(description) [template::util::richtext::get_property html_value $richtext_list]
+
 set task_info(slack_time) [pm::task::slack_time \
                                -earliest_start_j $task_info(earliest_start_j) \
                                -today_j $task_info(today_j) \