Index: openacs-4/packages/simulation/www/siminst/map-tasks.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/map-tasks.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/simulation/www/siminst/map-tasks.tcl 15 Dec 2003 15:28:21 -0000 1.3 +++ openacs-4/packages/simulation/www/siminst/map-tasks.tcl 19 Dec 2003 14:00:39 -0000 1.4 @@ -10,7 +10,7 @@ set page_title "Tasks for $workflow_array(pretty_name)" set context [list [list "." "SimInst" ] $page_title] -db_multirow -extend { description_html } tasks select_taks { +db_multirow -extend { description_html prop_missing_count } tasks select_taks { select a.action_id, a.short_name, a.pretty_name, @@ -26,6 +26,7 @@ and st.task_id = a.action_id } { set description_html [ad_html_text_convert -maxlen 100 -from $description_mime_type -- $description] + set prop_missing_count [expr $attachment_num - $prop_not_empty_count] } # TODO: Honor description_mime_type, fancy truncate @@ -43,8 +44,10 @@ } attachment_num { label "Number of attachments" + display_template {@tasks.attachment_num@} } - prop_not_empty_count { - label "Number of attachments populated" + prop_missing_count { + label "Missing attachments" + display_template {@tasks.prop_missing_count@} } }