Index: openacs-4/packages/evaluation-portlet/www/evaluation-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/www/evaluation-admin-portlet.tcl,v diff -u -r1.3 -r1.3.4.1 --- openacs-4/packages/evaluation-portlet/www/evaluation-admin-portlet.tcl 11 Sep 2004 00:41:10 -0000 1.3 +++ openacs-4/packages/evaluation-portlet/www/evaluation-admin-portlet.tcl 31 May 2005 23:13:21 -0000 1.3.4.1 @@ -9,7 +9,7 @@ } -properties { } - +set return_url [get_referrer] array set config $cf set user_id [ad_conn user_id] set list_of_package_ids $config(package_id)