Index: openacs-4/packages/acs-subsite/www/members/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/index.tcl,v diff -u -r1.14 -r1.15 --- openacs-4/packages/acs-subsite/www/members/index.tcl 30 Dec 2003 20:45:10 -0000 1.14 +++ openacs-4/packages/acs-subsite/www/members/index.tcl 26 Jan 2004 15:39:46 -0000 1.15 @@ -189,21 +189,21 @@ set ban_url [export_vars -base member-state-change { rel_id {member_state banned} }] set delete_url [export_vars -base member-state-change { rel_id {member_state deleted} }] } else { - set remove_url [export_vars -base member-remove { rel_id }] + set remove_url [export_vars -base member-remove { user_id }] } } "needs approval" { set approve_url [export_vars -base member-state-change { rel_id { member_state approved } }] if { $main_site_p } { set reject_url [export_vars -base member-state-change { rel_id {member_state rejected} }] } else { - set remove_url [export_vars -base member-remove { rel_id }] + set remove_url [export_vars -base member-remove { user_id }] } } "rejected" - "deleted" - "banned" { set approve_url [export_vars -base member-state-change { rel_id { member_state approved } }] if { !$main_site_p } { - set remove_url [export_vars -base member-remove { rel_id }] + set remove_url [export_vars -base member-remove { user_id }] } } }