Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl,v diff -u -N -r1.14 -r1.15 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl 15 May 2007 20:14:31 -0000 1.14 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl 9 Nov 2008 23:29:24 -0000 1.15 @@ -29,6 +29,7 @@ set user_id [ad_conn user_id] set referer [ad_conn url] set community_id $config(community_id) +set return_url [ad_return_url] set admin_p [dotlrn::user_can_admin_community_p -user_id $user_id -community_id $community_id] set read_private_data_p [dotlrn::user_can_read_private_data_p -user_id $user_id -object_id $community_id] @@ -43,7 +44,7 @@ template::multirow foreach users { set role [dotlrn_community::get_role_pretty_name -community_id $community_id -rel_type $rel_type] set community_member_url [acs_community_member_url -user_id $user_id] - set email [email_image::get_user_email -user_id $user_id] + set email [email_image::get_user_email -user_id $user_id -return_url $return_url] set name "$first_names $last_name" } @@ -56,7 +57,7 @@ bio { display_template { - #acs-subsite.Profile# + #acs-subsite.Profile# } label {}