Index: openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl,v diff -u -r1.8 -r1.8.2.1 --- openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 26 Apr 2005 17:25:42 -0000 1.8 +++ openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 25 Feb 2006 15:55:59 -0000 1.8.2.1 @@ -32,7 +32,12 @@ label "[_ assessment.open_assessments]" \ display_template {@assessments.title@}] +lappend elements anonymous_p \ + [list \ + label "[_ assessment-portlet.lt_Is_this_assessment_an]" \ + display_template {YesNo}] + # create a list with all open assessments template::list::create \ -name assessments \ @@ -42,7 +47,7 @@ -main_class narrow # get the information of all open assessments -template::multirow create assessments assessment_id title description assessment_url community_url community_name +template::multirow create assessments assessment_id title description assessment_url community_url community_name anonymous_p set old_comm_node_id 0 db_foreach open_asssessments {} { if {([empty_string_p $start_time] || $start_time <= $cur_time) && ([empty_string_p $end_time] || $end_time >= $cur_time)} { @@ -59,7 +64,7 @@ append assessment_url [export_vars -base "assessment-password" {assessment_id}] } - template::multirow append assessments $assessment_id $title $description $assessment_url $community_url $community_name + template::multirow append assessments $assessment_id $title $description $assessment_url $community_url $community_name $anonymous_p } }