Index: openacs-4/packages/acs-admin/www/users/member-state-change.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/member-state-change.tcl,v diff -u -N -r1.18 -r1.19 --- openacs-4/packages/acs-admin/www/users/member-state-change.tcl 7 Aug 2017 23:47:45 -0000 1.18 +++ openacs-4/packages/acs-admin/www/users/member-state-change.tcl 11 Sep 2017 14:56:16 -0000 1.19 @@ -84,7 +84,7 @@ set message $email_message if {$return_url eq ""} { - set return_url [export_vars -base /acs-admin/users/one {user_id}] + set return_url [acs_community_member_admin_url -user_id $user_id] } set context [list [list "./" "Users"] "$action"] Index: openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl 7 Aug 2017 23:47:45 -0000 1.6 +++ openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl 11 Sep 2017 14:56:16 -0000 1.7 @@ -13,8 +13,9 @@ set confirmed_url [export_vars -base /acs-admin/users/modify-admin-privileges { user_id:sign(max_age=60) action:sign {confirmed_p 1} }] -set return_url [export_vars -base /acs-admin/users/one {user_id}] +set return_url [acs_community_member_admin_url -user_id $user_id] + set context [list [list "./" "Users"] "Modify privileges"] if {$confirmed_p} { Index: openacs-4/packages/acs-admin/www/users/user-add-3.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/user-add-3.adp,v diff -u -N -r1.8 -r1.9 --- openacs-4/packages/acs-admin/www/users/user-add-3.adp 3 Jul 2015 10:25:40 -0000 1.8 +++ openacs-4/packages/acs-admin/www/users/user-add-3.adp 11 Sep 2017 14:56:16 -0000 1.9 @@ -8,7 +8,7 @@

Index: openacs-4/packages/acs-admin/www/users/user-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/user-add-3.tcl,v diff -u -N -r1.9 -r1.10 --- openacs-4/packages/acs-admin/www/users/user-add-3.tcl 7 Aug 2017 23:47:45 -0000 1.9 +++ openacs-4/packages/acs-admin/www/users/user-add-3.tcl 11 Sep 2017 14:56:16 -0000 1.10 @@ -15,11 +15,11 @@ last_name:onevalue export_vars:onevalue } - + set admin_user_id [ad_conn user_id] set context [list [list "./" "Users"] "New user notified"] -set export_vars [export_vars {user_id}] +set admin_url [acs_community_member_admin_url -user_id $user_id] set admin_email [db_string get_admin_email {}] set subject "You have been added as a user to [ad_system_name] at [ad_url]"