Index: openacs-4/packages/evaluation-portlet/www/evaluation-evaluations-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/www/evaluation-evaluations-portlet.tcl,v diff -u -r1.6.2.1 -r1.6.2.2 --- openacs-4/packages/evaluation-portlet/www/evaluation-evaluations-portlet.tcl 18 Nov 2004 00:19:04 -0000 1.6.2.1 +++ openacs-4/packages/evaluation-portlet/www/evaluation-evaluations-portlet.tcl 8 Jun 2005 22:23:37 -0000 1.6.2.2 @@ -18,7 +18,8 @@ array set config $cf set shaded_p $config(shaded_p) - +set evaluation_id [evaluation_evaluations_portlet::get_package_id_from_key -package_key "evaluation"] +set simple_p [parameter::get -parameter "SimpleVersion" -package_id $evaluation_id] set list_of_package_ids $config(package_id) set one_instance_p [ad_decode [llength $list_of_package_ids] 1 1 0]