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.4 -r1.5 --- openacs-4/contrib/packages/project-manager/www/task-print.tcl 27 Apr 2004 00:49:29 -0000 1.4 +++ openacs-4/contrib/packages/project-manager/www/task-print.tcl 17 May 2004 18:18:37 -0000 1.5 @@ -92,10 +92,11 @@ # Task info ---------------------------------------------------------- db_1row task_query { } -column_array task_info -if {[string equal $task_info(mime_type) "text/plain"]} { - 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) \